]> git.donarmstrong.com Git - lilypond.git/commitdiff
Web build: only lc() the last part of an external href.
authorGraham Percival <graham@percival-music.ca>
Mon, 1 Feb 2010 23:12:30 +0000 (23:12 +0000)
committerGraham Percival <graham@percival-music.ca>
Mon, 1 Feb 2010 23:12:30 +0000 (23:12 +0000)
Another nasty workaround, although this is our directory system's
fault, not texinfo's.

Documentation/lilypond-texi2html.init

index 8efff62b1022dce8bcb7f11a144a508a81750f01..4a6e1b15823f6c1d157173c9b641a3ba7233c773 100644 (file)
@@ -924,7 +924,14 @@ sub lilypond_external_ref($$$$$$)
   my $section = shift;
   my $book = shift;
   my $file_node = shift;
-  my $href = lc(shift);
+  my $href = shift;
+
+  # only lc() the last portion:
+  my @htmlsplit = split('/', $href);
+  # change the last portion (the filename)
+  @htmlsplit[$#array] = lc( @htmlsplit[$#array] );
+  $href = join("/", @htmlsplit);
+
   my $cross_ref = shift;
 
   my $displaytext = '';