From: Laszlo Molnar <laszlo.molnar@eth.ericsson.se>
Date: Fri, 10 Jul 1998 23:12:11 +0000 (+0200)
Subject: dos-djgpp update
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=17f71141966ee46b5f078333acef6afd9893a4f4;p=p5sagit%2Fp5-mst-13.2.git

dos-djgpp update

	Message-ID: <19980710231211.A161@cdata.tvnet.hu>

p4raw-id: //depot/perl@1433
---

diff --git a/Configure b/Configure
index d0a3136..9c69a2e 100755
--- a/Configure
+++ b/Configure
@@ -10955,7 +10955,7 @@ for xxx in $known_extensions ; do
 		true|$define|y) avail_ext="$avail_ext $xxx" ;;
 		esac
 		;;
-	IPC/SysV|ipc_sysv)
+	IPC/SysV|ipc/sysv)
 		case "$d_sem" in 
 		$define) avail_ext="$avail_ext $xxx" ;;
 		esac
diff --git a/djgpp/config.over b/djgpp/config.over
index b11b493..fc66e9e 100644
--- a/djgpp/config.over
+++ b/djgpp/config.over
@@ -8,12 +8,14 @@ repair()
     sed \
      -e 's/^b/B/'\
      -e 's=\([^a-z_]\)b=\1B='\
+     -e 's=data/dumper=Data/Dumper='\
      -e 's/db_file/DB_File/'\
      -e 's/dynaload/DynaLoader/'\
      -e 's/errno/Errno/'\
      -e 's/fcntl/Fcntl/'\
      -e 's/gdbm_fil/GDBM_File/'\
      -e 's/io/IO/'\
+     -e 's=ipc/sysv=IPC/SysV='\
      -e 's/ndbm_fil/NDBM_File/'\
      -e 's/odbm_fil/ODBM_File/'\
      -e 's/opcode/Opcode/'\
diff --git a/djgpp/djgppsed.sh b/djgpp/djgppsed.sh
index bf9d4ea..5276f4f 100644
--- a/djgpp/djgppsed.sh
+++ b/djgpp/djgppsed.sh
@@ -46,3 +46,4 @@ sed -e $SPACKLIST installman >s; mv -f s installman
 sed -e $SPACKLIST lib/ExtUtils/Installed.pm >s; mv -f s lib/ExtUtils/Installed.pm
 sed -e $SPACKLIST lib/ExtUtils/Packlist.pm >s; mv -f s lib/ExtUtils/Packlist.pm
 sed -e $SPACKLIST lib/ExtUtils/inst >s; mv -f s lib/ExtUtils/inst
+sed -e $SABC t/io/iprefix.t >s; mv -f s t/io/iprefix.t
diff --git a/djgpp/fixpmain b/djgpp/fixpmain
index 6db6555..e999ff5 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