--- perl/lib/Pod/Html.pm.orig      2005-05-05 08:46:10.000000000 -0700
+++ perl/lib/Pod/Html.pm   2005-07-04 00:06:33.823966400 -0700
@@ -1883,7 +1883,7 @@
     my( $url );
 
     my $fid = fragment_id( $item );
-    if( defined( $page ) ){
+    if( defined( $page ) && $page ne "" ){
        # we have been given a $page...
        $page =~ s{::}{/}g;
 
End of Patch.

Reply via email to