diff options
| author | Laszlo Molnar <laszlo.molnar@eth.ericsson.se> | 2001-06-19 12:59:06 +0200 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-06-19 10:54:22 +0000 |
| commit | 87dc812ed71694a5521f0d42f9ebe01f7ee37248 (patch) | |
| tree | ddb25ca23a5b4910ade4589a5cc2f021a0708e43 /djgpp | |
| parent | 0fefa106d69895b11733fade5a0084102ee3972f (diff) | |
| download | perl-87dc812ed71694a5521f0d42f9ebe01f7ee37248.tar.gz | |
djgpp updates
Message-ID: <20010619105906.C5600@libra.eth.ericsson.se>
p4raw-id: //depot/perl@10718
Diffstat (limited to 'djgpp')
| -rw-r--r-- | djgpp/config.over | 2 | ||||
| -rw-r--r-- | djgpp/fixpmain | 4 |
2 files changed, 4 insertions, 2 deletions
diff --git a/djgpp/config.over b/djgpp/config.over index 9e66eefbd9..a040ece42b 100644 --- a/djgpp/config.over +++ b/djgpp/config.over @@ -41,7 +41,7 @@ repair() -e 's=digest/md5=Digest/MD5=' \ -e 's=perlio/scalar=PerlIO/Scalar=' \ -e 's=mime/base64=MIME/Base64=' \ - -e 's=time/hires=Time/HiRes=' + -e 's=time/hires=Time/HiRes=' \ -e 's=list/util=List/Util=' \ -e 's=time/piece=Time/Piece=' } 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; } |