Truncate overlong table entries.

[irspy-moved-to-github.git] / web / htdocs / help.html
diff --git a/web/htdocs/help.html b/web/htdocs/help.html

index 1ebf917..c211356 100644 (file)
--- a/web/htdocs/help.html
+++ b/web/htdocs/help.html
@@ -1,4 +1,4 @@
-%# $Id: help.html,v 1.2 2006-12-04 15:41:23 mike Exp $
+%# $Id: help.html,v 1.5 2006-12-06 14:07:17 mike Exp $
  <%args>
  $help
  </%args>
@@ -35,7 +35,7 @@ asks and answers the question:
  
         Not that I know of, other than using javascript.
  
-Nice one, W3C!  Way to improve portability!
+Nice one, W3C!  Way to improve cross-browser portability!
  </%doc>
  <?xml version="1.0" encoding="ISO-8859-1"?>
  <!DOCTYPE html 
@@ -45,20 +45,30 @@ Nice one, W3C!  Way to improve portability!
   <head>
    <title>IRSpy help: <% $help %></title>
    <style type="text/css">
-   body { background: #ffffc0; font-size: small }
+   body { background: #ffffc0 }
+   h1 { background: #d4e7f3; padding: 0.25em 0.5em;
+       font-size: 150%; text-align: center }
     ul.gappy li { margin-top: 1em }
+   .small { font-size: small }
    </style>
    <script type="text/JavaScript">
     function sendOpener (relativeURI) {
-    /*alert(opener.document.location.host + relativeURI);*/
+%#  alert(opener.document.location.host + relativeURI);
      opener.document.location = relativeURI;
     }
    </script>
   </head>
   <body>
    <h1>IRSpy help: <% $help %></h1>
-% $m->comp("/help/$help.html");
-  <p>
+<%perl>
+my @path = split /\//, $help;
+foreach my $i (0 .. $#path) {
+    my $partialPath = join("/", @path[0..$#path-$i]);
+    eval { $m->comp("/help/$partialPath.html") };
+    print "  <p>[No help for '$partialPath']</p>\n" if $@;
+}
+</%perl>
+  <p style="text-align: center">
     <input type="button" onclick="self.close()" value="OK"/>
    </p>
   </body>