From: Reinhold Kainhofer <reinhold@kainhofer.com>
Date: Tue, 30 Sep 2008 16:56:27 +0000 (+0200)
Subject: Docs: Make TOC headline in TOC frame a link to the top node and use manual title
X-Git-Tag: release/2.11.61-1~19
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=5b5aa1450f7f57fef0ba391556fae22dce049f63;p=lilypond.git

Docs: Make TOC headline in TOC frame a link to the top node and use manual title

-) Make TOC headline in TOC frame a link to the top node
-) Use the manual title as the TOC headline in the TOC bar on the left
---

diff --git a/lilypond-texi2html.init b/lilypond-texi2html.init
index f05ee37a48..5573c92bac 100644
--- a/lilypond-texi2html.init
+++ b/lilypond-texi2html.init
@@ -612,8 +612,13 @@ sub lilypond_print_toc_div ($$)
   # use default TOC if no custom lines have been generated
   @lines = @default_toc if (not @lines);
   if (@lines) {
+  
     print $fh "\n\n<div id=\"tocframe\">\n";
-    print $fh '<h4> ' . $Texi2HTML::NAME{'Contents'}  . "</h4>\n";
+    print $fh '<h4 class="toc_header"> ' . &$anchor('',
+                                    $Texi2HTML::HREF{'Top'},
+                                    $Texi2HTML::NAME{'Top'},
+                                    'title="Start of the manual"'
+                                   ) . "</h4>\n";
     foreach my $line (@lines) {
       print $fh $line;
     }