diff options
Diffstat (limited to 'bin/pod2x')
-rwxr-xr-x | bin/pod2x | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -106,7 +106,7 @@ foreach my $file ( 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; |