this *should* fix munging of non-internal links, i hope
authorivan <ivan>
Thu, 4 Oct 2007 01:56:12 +0000 (01:56 +0000)
committerivan <ivan>
Thu, 4 Oct 2007 01:56:12 +0000 (01:56 +0000)
bin/pod2x

index 4a3e800..5c23ddd 100755 (executable)
--- a/bin/pod2x
+++ b/bin/pod2x
@@ -106,7 +106,7 @@ foreach my $file (
   open(RAW, "<$html/$name.rawwiki") or die $!;
   open(WIKI,">$html/$name.wiki"   ) or die $!;
   while (<RAW>) {
   open(RAW, "<$html/$name.rawwiki") or die $!;
   open(WIKI,">$html/$name.wiki"   ) or die $!;
   while (<RAW>) {
-    s/\[\[([^#][^\]]*)\]\]/"[[$html\/". w_e($1). "|$1]]"/ge;
+    s/\[\[([^#\/][^\]]*)\]\]/"[[$html\/". w_e($1). "|$1]]"/ge;
     print WIKI $_;
   }
   close RAW;
     print WIKI $_;
   }
   close RAW;