Changeset 22578 for util

Timestamp:

10/11/08 15:31:00 (6 weeks ago)

Author:

masak

Message:

[util/smartlinks.pl] unbroke cross-reference links between synopses

Files:

• util/smartlinks.pl (modified) (2 diffs)

util/smartlinks.pl

@@ -414 +414 @@
 
     eval { require Pod::Simple::HTML };
+    $Pod::Simple::HTML::Perldoc_URL_Prefix  = 'http://perlcabal.org/syn/';
+    $Pod::Simple::HTML::Perldoc_URL_Postfix = '.html';
     die "error: Pod::Simple::HTML is not installed on your machine.\n"
         if $@;
@@ -712 +714 @@
     }
 
-    # We need this to check invalid smartlinks pointed to unexistent docs:
+    # We need this to check invalid smartlinks pointed to non-existent docs:
     delete $linktree->{"S$syn_id"};