commit | b979854f538894bfb9b0534af9f6325ef88b0447 | [log] [tgz] |
---|---|---|
author | rsc <devnull@localhost> | Fri Mar 18 18:53:21 2005 +0000 |
committer | rsc <devnull@localhost> | Fri Mar 18 18:53:21 2005 +0000 |
tree | d409957ef08c05c9b76e426761720c893b19d738 | |
parent | 7924d524b9ea212ef2ef3e73bfcd197167478fdd [diff] [blame] |
bug fix
diff --git a/dist/addsrclinks b/dist/addsrclinks index f0311aa..9f87b8a 100755 --- a/dist/addsrclinks +++ b/dist/addsrclinks
@@ -3,7 +3,7 @@ @_ = <>; my $root = $ENV{'PLAN9'}; my $html = join("", @_); -$html =~ s;$root;XXX$root;g; +$html =~ s;$root/;XXX$root/;g; while($html =~ /((.|\n)*)XXX($root\/([a-zA-Z0-9_.\/]|−)*[a-zA-Z0-9_\/])((.|\n)*)/){ ($a, $b, $c) = ($1, $3, $5); $b =~ s/−/-/g;