From: Gurusamy Sarathy <gsar@cpan.org>
Date: Sun, 5 Dec 1999 00:33:34 +0000 (+0000)
Subject: fix bug in processing L<> tags (from j.vavruska@post.cz)
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=770bbf7fa6ce320a36c372f3f2c4e5c114f0c097;p=p5sagit%2Fp5-mst-13.2.git

fix bug in processing L<> tags (from j.vavruska@post.cz)

p4raw-id: //depot/perl@4648
---

diff --git a/lib/Pod/Html.pm b/lib/Pod/Html.pm
index e9c640c..15757ec 100644
--- a/lib/Pod/Html.pm
+++ b/lib/Pod/Html.pm
@@ -1487,7 +1487,7 @@ sub process_L {
 	if (m,^(.*?)/"?(.*?)"?$,) {	# yes
 	    ($page, $section) = ($1, $2);
 	} else {			# no
-	    ($page, $section) = ($str, "");
+	    ($page, $section) = ($_, "");
 	}
 
 	# check if we know that this is a section in this page