From 5b5aa1450f7f57fef0ba391556fae22dce049f63 Mon Sep 17 00:00:00 2001
From: Reinhold Kainhofer <reinhold@kainhofer.com>
Date: Tue, 30 Sep 2008 18:56:27 +0200
Subject: [PATCH] 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
---
 lilypond-texi2html.init | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

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;
     }
-- 
2.39.2