From: Axel Kollmorgen <unknown>
Date: Thu, 27 Sep 2007 16:03:38 +0000 (-0700)
Subject: [perl #45823] [PATCH] v5.8.8. pod2html: <a name="example"> anchor, but <a href="item_... 
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=ffb0b41ddab819dfe927b571e62eeff6a7811557;p=p5sagit%2Fp5-mst-13.2.git

[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
---

diff --git a/lib/Pod/Html.pm b/lib/Pod/Html.pm
index 232bd2b..cd24d69 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 25147bb..e8c10a7 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 />