diff options
Diffstat (limited to 'djgpp/fixpmain')
-rw-r--r-- | djgpp/fixpmain | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/djgpp/fixpmain b/djgpp/fixpmain index 6b0591c40f..3f965f1c5b 100644 --- a/djgpp/fixpmain +++ b/djgpp/fixpmain @@ -20,7 +20,9 @@ for $realname (@exts) { $dosname=join ("__",map {lc substr ($_,0,8)} split /\//,$realname); $realname =~ s!/!__!g; - $perlmain =~ s/\bboot_$dosname/boot_$realname/gm; + $perlmain =~ s/\bboot_$dosname\b/boot_$realname/gm; + $dosname =~ s/__/::/; + $realname =~ s/__/::/; $perlmain =~ s/\b$dosname(::bootstrap)/$realname$1/gm; } |