Hello. This patch fixes remove_unneeded_anchor of
lilypond-texi2html.init so that now
- anchors that equal the filename are removed, respecting the .html
part of the filename
- anchors that differ from the filename are left untouched.
The patch does not include a call to the function from the proper
place, it only fixes the function itself.
It is a small step towards #1036.
--
Francisco Vila. Badajoz (Spain)
www.paconet.org , www.csmbadajoz.com
From db0ad5d26edf35c4dbc430aea879f730fcc33ae1 Mon Sep 17 00:00:00 2001
From: Francisco Vila <francisco.v...@hispalinux.es>
Date: Wed, 19 May 2010 17:10:02 +0200
Subject: [PATCH] Doc-build: make remove_unneeded_anchor actually work
---
Documentation/lilypond-texi2html.init | 8 ++++----
1 files changed, 4 insertions(+), 4 deletions(-)
diff --git a/Documentation/lilypond-texi2html.init b/Documentation/lilypond-texi2html.init
index 3438478..c247646 100644
--- a/Documentation/lilypond-texi2html.init
+++ b/Documentation/lilypond-texi2html.init
@@ -1107,14 +1107,14 @@ sub lilypond_external_href($$$)
sub remove_unneeded_anchor($)
{
- my $ref = shift;
+ my $href = shift;
my @hrefsplit = split("/", $href);
for ($i = 0; $i < @hrefsplit; $i++) {
$item = @hrefsplit[$i];
if ($item =~ /#/) {
- @splitted = split("#", $item);
- if (@splitted[0] == @splitted[1]) {
- @hrefsplit[$i] = @splitted[0]
+ @splitted = split(".html#", $item);
+ if (@splitted[0] eq @splitted[1]) {
+ @hrefsplit[$i] = @splitted[0] . ".html";
}
}
}
--
1.7.0.4
_______________________________________________
lilypond-devel mailing list
lilypond-devel@gnu.org
http://lists.gnu.org/mailman/listinfo/lilypond-devel
