Fix detail in welcome prompt for windows users.

[lilypond.git] / Documentation / web-texi2html.init

diff --git a/Documentation/web-texi2html.init b/Documentation/web-texi2html.init
index 2bc6275b6d6bfcdd96c9f884c383445bae6f36a4..fb49202c8f365dc65373b739d9056084aecb0d9e 100644 (file)
--- a/Documentation/web-texi2html.init
+++ b/Documentation/web-texi2html.init
@@ -1,6 +1,12 @@
 #!/usr/bin/env perl
 # -*- coding: utf-8; -*-
 
+# this file is a complete mess.  Some things are commented out
+# because that's the only way it works.  About 70% of the code in
+# this file is never called.  All in all, it's in drastic need of
+# a complete review/editing, but we don't have the time right now.
+
+
 ### WTF, perl cannot read a file?
 ###use File::Slurp qw( read_file );
 
@@ -124,9 +130,9 @@ $Texi2HTML::Config::SEPARATED_FOOTNOTES = 0; # Print footnotes on same page, not
 # FIXME: creates duplicate anchors, which causes Opera to barf;
 #       should be fixed in lilypond-texi2html.init too
 # Uhm, what about a bug report to Opera?  We need sane names here.
-if ($Texi2HTML::Config::SPLIT eq 'section') {
-  $Texi2HTML::Config::element_file_name    = \&lilypond_element_file_name;
-}
+#if ($Texi2HTML::Config::SPLIT eq 'section') {
+#  $Texi2HTML::Config::element_file_name    = \&lilypond_element_file_name;
+#}
 $Texi2HTML::Config::element_target_name  = \&lilypond_element_target_name;
 $default_print_element_header = $Texi2HTML::Config::print_element_header;
 $Texi2HTML::Config::print_element_header = \&lilypond_print_element_header;
@@ -645,7 +651,7 @@ sub generate_ly_toc_entries($$$)
   my @color_3 = (
         "Productions", "Testimonials",
        "Source", "Old downloads",
-        "FAQ", "Changes", "Internals",
+        "FAQ", "Changes", "Extend", "Internals",
         "Publications", "Old news"
         );
   my @color_4 = (
@@ -753,8 +759,8 @@ sub lilypond_generate_page_toc_body($)
     if (!exists($main::value{'shallow_toc'})) {
 # WTF, perl needs 6 lines of magic to do: ' ' + open ('file-name').read ()?
        local $/=undef;
-        my $name = 'search-box.html';
-       open FILE, $name or open FILE, "../$name" or die  die "no such file: $name: $!";
+        my $name = "search-box.html";
+       open FILE, "$ENV{SRC_DIR}/$name" or open FILE, "$ENV{SRC_DIR}/../$name" or die  die "no such file: $name: $!";
 
 # All these also seems to work, but fail silently.  Great, it runs!
 # It's late already, let's this broken site.
@@ -880,6 +886,8 @@ sub print_lilypond_page_foot($)
   print $fh "</div>\n";
   }
 
+  # FIXME: This div and p#languages need to be in div#footer.
+  #        Should we move this div to postprocess_html.py ?
   print $fh "<div id=\"verifier_texinfo\">\n";
   print $fh "<h3>Validation</h3>\n";
   print $fh "<p>Thanks to <a href=\"http://www.webdev.nl/\">webdev.nl</a>";
@@ -889,7 +897,6 @@ sub print_lilypond_page_foot($)
   print $fh "     alt=\"Valid HTML 4.01 Transitional\"\n";
   print $fh "     height=\"31\" width=\"88\"></a></p>\n";
   print $fh "</div>";
-  print $fh "</div>";
 
   # Print the TOC frame and reset the TOC:
   lilypond_print_toc_div ($fh, \@this_page_toc);