diff options
| author | Axel Kollmorgen <unknown> | 2007-09-27 09:03:38 -0700 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2007-10-09 12:25:05 +0000 |
| commit | ffb0b41ddab819dfe927b571e62eeff6a7811557 (patch) | |
| tree | 72eab73d4cc9e85c658439ba36f9ab2f0871f55a | |
| parent | 6a2b710f1bb3d2a9f4cff465908fb9a456cc7c0c (diff) | |
| download | perl-ffb0b41ddab819dfe927b571e62eeff6a7811557.tar.gz | |
[perl #45823] [PATCH] v5.8.8. pod2html: <a name="example"> anchor, but <a href="item_example"> link
From: Axel Kollmorgen (via RT) <perlbug-followup@perl.org>
Message-ID: <rt-3.6.HEAD-10743-1190934218-322.45823-75-0@perl.org>
p4raw-id: //depot/perl@32079
| -rw-r--r-- | lib/Pod/Html.pm | 4 | ||||
| -rw-r--r-- | lib/Pod/t/htmllink.t | 36 |
2 files changed, 20 insertions, 20 deletions
diff --git a/lib/Pod/Html.pm b/lib/Pod/Html.pm index 232bd2b51a..cd24d699b0 100644 --- a/lib/Pod/Html.pm +++ b/lib/Pod/Html.pm @@ -1987,7 +1987,7 @@ sub coderef($$){ if( exists $Pages{$page} and $Pages{$page} =~ /([^:.]*)\.[^:]*:/){ $page = $1 . '.html'; } - my $link = "$Htmlroot/$page#item_" . anchorify($fid); + my $link = "$Htmlroot/$page#" . anchorify($fid); # Here, we take advantage of the knowledge that $Htmlfileurl # ne '' implies $Htmlroot eq ''. @@ -1998,7 +1998,7 @@ sub coderef($$){ $url = $link ; } } else { - $url = "#item_" . anchorify($fid); + $url = "#" . anchorify($fid); } confess "url has space: $url" if $url =~ /"[^"]*\s[^"]*"/; diff --git a/lib/Pod/t/htmllink.t b/lib/Pod/t/htmllink.t index 25147bb1ef..e8c10a7705 100644 --- a/lib/Pod/t/htmllink.t +++ b/lib/Pod/t/htmllink.t @@ -58,39 +58,39 @@ __DATA__ <p><a href="#section1">section1</a></p> <p><a href="#section_2">section 2</a></p> <p><a href="#section_three">section three</a></p> -<p><a href="#item_item1">item1</a></p> -<p><a href="#item_item_2">item 2</a></p> -<p><a href="#item_item_three">item three</a></p> +<p><a href="#item1">item1</a></p> +<p><a href="#item_2">item 2</a></p> +<p><a href="#item_three">item three</a></p> <p><a href="#section1">section1</a></p> <p><a href="#section_2">section 2</a></p> <p><a href="#section_three">section three</a></p> -<p><a href="#item_item1">item1</a></p> -<p><a href="#item_item_2">item 2</a></p> -<p><a href="#item_item_three">item three</a></p> +<p><a href="#item1">item1</a></p> +<p><a href="#item_2">item 2</a></p> +<p><a href="#item_three">item three</a></p> <p><a href="#section1">section1</a></p> <p><a href="#section_2">section 2</a></p> <p><a href="#section_three">section three</a></p> -<p><a href="#item_item1">item1</a></p> -<p><a href="#item_item_2">item 2</a></p> -<p><a href="#item_item_three">item three</a></p> +<p><a href="#item1">item1</a></p> +<p><a href="#item_2">item 2</a></p> +<p><a href="#item_three">item three</a></p> <p><a href="#section1">text</a></p> <p><a href="#section_2">text</a></p> <p><a href="#section_three">text</a></p> -<p><a href="#item_item1">text</a></p> -<p><a href="#item_item_2">text</a></p> -<p><a href="#item_item_three">text</a></p> +<p><a href="#item1">text</a></p> +<p><a href="#item_2">text</a></p> +<p><a href="#item_three">text</a></p> <p><a href="#section1">text</a></p> <p><a href="#section_2">text</a></p> <p><a href="#section_three">text</a></p> -<p><a href="#item_item1">text</a></p> -<p><a href="#item_item_2">text</a></p> -<p><a href="#item_item_three">text</a></p> +<p><a href="#item1">text</a></p> +<p><a href="#item_2">text</a></p> +<p><a href="#item_three">text</a></p> <p><a href="#section1">text</a></p> <p><a href="#section_2">text</a></p> <p><a href="#section_three">text</a></p> -<p><a href="#item_item1">text</a></p> -<p><a href="#item_item_2">text</a></p> -<p><a href="#item_item_three">text</a></p> +<p><a href="#item1">text</a></p> +<p><a href="#item_2">text</a></p> +<p><a href="#item_three">text</a></p> <p> </p> <hr /> |