diff options
| author | Laszlo Molnar <laszlo.molnar@eth.ericsson.se> | 1998-07-11 01:12:11 +0200 |
|---|---|---|
| committer | Gurusamy Sarathy <gsar@cpan.org> | 1998-07-11 18:43:11 +0000 |
| commit | 17f71141966ee46b5f078333acef6afd9893a4f4 (patch) | |
| tree | e36a65a900fc3f9da49aac2796d2e58018da99fe /djgpp/fixpmain | |
| parent | c3464db50133a6aa976b7250fa2eb5c58e26f877 (diff) | |
| download | perl-17f71141966ee46b5f078333acef6afd9893a4f4.tar.gz | |
dos-djgpp update
Message-ID: <19980710231211.A161@cdata.tvnet.hu>
p4raw-id: //depot/perl@1433
Diffstat (limited to 'djgpp/fixpmain')
| -rw-r--r-- | djgpp/fixpmain | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/djgpp/fixpmain b/djgpp/fixpmain index 6db6555ecf..e999ff5ded 100644 --- a/djgpp/fixpmain +++ b/djgpp/fixpmain @@ -19,8 +19,8 @@ $perlmain =~ s/^.*boot_$badname.*$//gm if $badname; # delete bad lines for $realname (@exts,'DynaLoader') { $dosname=substr (lc $realname,0,8); - $perlmain =~ s/boot_$dosname/boot_$realname/gm; - $perlmain =~ s/$dosname(::bootstrap)/$realname$1/gm; + $perlmain =~ s/\bboot_$dosname/boot_$realname/gm; + $perlmain =~ s/\b$dosname(::bootstrap)/$realname$1/gm; } #DynaLoader is special |