Docs-hu: Fix missing menu from Learning 1.3 Docs-hu: Polish navigation translation...

[lilypond.git] / Documentation / web-texi2html.init
diff --git a/Documentation/web-texi2html.init b/Documentation/web-texi2html.init

index 68dc5f78f78ae8797ce680cb2920931aff78fade..8669b47d88ef3d37fc12222dde6ddb9a2018c1ef 100644 (file)
--- a/Documentation/web-texi2html.init
+++ b/Documentation/web-texi2html.init
@@ -110,6 +110,9 @@ sub ly_get_string () {
  ###  SETTINGS FOR TEXI2HTML
  #############################################################################
  
+# no bgcolor and link colors in <body> tag
+# in texi2html >=1.83, override $Texi2HTML::Config::html_default_bodytext instead
+$Texi2HTML::Config::BODYTEXT = "";
  # Validation fix for texi2html<=1.82
  $Texi2HTML::Config::DOCTYPE = '<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">';
  
@@ -131,7 +134,7 @@ $Texi2HTML::Config::SEPARATED_FOOTNOTES = 0; # Print footnotes on same page, not
  #       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;
+$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;
@@ -229,6 +232,8 @@ sub texinfo_file_name($)
      $result = 't_g' . $result;
    }
    # DONE
+  # we also want lower-case
+  $result = lc($result);
    return $result
  }
  
@@ -324,15 +329,6 @@ sub lilypond_css_lines ($$)
  ###  SPLITTING BASED ON NUMBERED SECTIONS
  #############################################################################
  
-# FIXME: removed for GOP.
-
-# Uhm, yes: that's what I found.  It was gone.  No need to add that
-# in a comment, DIFF tells me that it's gone.
-
-# Comments can be used to tell *why* something has been removed -- as
-# it seems to me that we *need* this in order to get sane,
-# untranslated, html file names?  Putting it back for this reason.
-
  my $lastfilename;
  my $docnr = 0;
  my $node_to_filename_map = ();
@@ -368,7 +364,10 @@ sub lilypond_element_file_name($$$)
    # will not be able to retrieve the file name for xrefs!!! Still, I already
    # had that code, so I'll leave it in in case something goes wrong with the
    # extract_texi_filenames.py script in the lilypond build process!
-  if (exists ($node_to_filename_map->{$node_name})) {
+
+  # FIXME: disable this section of code, I don't understand why but
+  # it gives us the filenames we want.  -gp
+  if (0 and exists ($node_to_filename_map->{$node_name})) {
      (my $filename, my $anchor) = @{$node_to_filename_map->{$node_name}};
      $filename .= ".$docu_ext" if (defined($docu_ext));
  
@@ -395,7 +394,8 @@ sub lilypond_element_file_name($$$)
  
      # Numbered sections will get a filename Node_title, unnumbered sections will use
      # the file name of the previous numbered section:
-    if (($element->{number}) or ($lastfilename eq '') or ($element->{level} == 1)) {
+    # FIXME: above comment is false; for web we want to give them all new filenames.
+    if (1 or ($element->{number}) or ($lastfilename eq '') or ($element->{level} > 1)) {
        # normalize to the same file name as texinfo
        if ($element->{translationof}) {
          $node_name = main::remove_texi($element->{translationof});
@@ -405,10 +405,10 @@ sub lilypond_element_file_name($$$)
        $docnr += 1;
        $$element{doc_nr} = $docnr;
        $lastfilename = $filename;
-      return $filename;
+      return lc($filename);
      } else {
        $$element{doc_nr} = $docnr;
-      return $lastfilename;
+      return lc($lastfilename);
      }
    }
  
@@ -490,7 +490,7 @@ sub lilypond_external_ref($$$$$$)
    }
  
    $displaytext = &$anchor('', $href, $displaytext) if ($displaytext ne '');
-  return &$I('%{node_file_href}', { 'node_file_href' => $displaytext });
+  return lc(&$I('%{node_file_href}', { 'node_file_href' => $displaytext }));
  }
  
  
@@ -651,7 +651,7 @@ sub generate_ly_toc_entries($$$)
    my @color_3 = (
          "Productions", "Testimonials",
         "Source", "Old downloads",
-        "FAQ", "Changes", "Internals",
+        "Web", "FAQ", "Changes", "Extend", "Internals",
          "Publications", "Old news"
          );
    my @color_4 = (
@@ -760,7 +760,7 @@ sub lilypond_generate_page_toc_body($)
  # 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, "$ENV{SRC_DIR}/$name" or die  die "no such file: $name: $!";
+       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.