From e14cd3316c84da6a01e4dad42feda1b25216d796 Mon Sep 17 00:00:00 2001 From: Mike Taylor Date: Tue, 5 Dec 2006 12:29:38 +0000 Subject: [PATCH] "Soft" errors for not-yet-available help. --- web/htdocs/help.html | 14 +++++++++----- 1 file changed, 9 insertions(+), 5 deletions(-) diff --git a/web/htdocs/help.html b/web/htdocs/help.html index 8793011..ba4b3ee 100644 --- a/web/htdocs/help.html +++ b/web/htdocs/help.html @@ -1,4 +1,4 @@ -%# $Id: help.html,v 1.3 2006-12-05 12:24:51 mike Exp $ +%# $Id: help.html,v 1.4 2006-12-05 12:29:38 mike Exp $ <%args> $help @@ -60,10 +60,14 @@ Nice one, W3C! Way to improve cross-browser portability!

IRSpy help: <% $help %>

-% my @path = split /\//, $help; -% foreach my $i (0 .. $#path) { -% $m->comp("/help/" . join("/", @path[0..$#path-$i]) . ".html"); -% } +<%perl> +my @path = split /\//, $help; +foreach my $i (0 .. $#path) { + my $partialPath = join("/", @path[0..$#path-$i]); + eval { $m->comp("/help/$partialPath.html") }; + print "

[No help for '$partialPath']

\n" if $@; +} +

-- 1.7.10.4