perl 5.003_02: [no incremental changelog available]

7 files changed, 31 insertions, 20 deletions

diff --git a/plan9/fndvers b/plan9/fndvers
index c45c42bdf9..ad622e7fe8 100644
--- a/plan9/fndvers
+++ b/plan9/fndvers
@@ -5,5 +5,10 @@
 ed config.plan9 <<!
 g/_P9P_VERSION/s//$p9pvers/g
 g/_P9P_OBJTYPE/s//$objtype/g
-w $1
+w config.h
+!
+
+ed plan9/genconfig.pl<<!
+g/_P9P_VERSION/s//$p9pvers/g
+w plan9/genconfig.pl
 !
diff --git a/plan9/genconfig.pl b/plan9/genconfig.pl
index 2ab6295884..edcaf338db 100644
--- a/plan9/genconfig.pl
+++ b/plan9/genconfig.pl
@@ -10,7 +10,7 @@
 #
 
 #==== Locations of installed Perl components
-$p9pvers="5.00301";
+$p9pvers="_P9P_VERSION";
 $prefix='';
 $p9p_objtype=$ENV{'objtype'};
 $builddir="/sys/src/cmd/perl/$p9pvers";
diff --git a/plan9/mkfile b/plan9/mkfile
index 65568b2b16..64f9fa46b7 100644
--- a/plan9/mkfile
+++ b/plan9/mkfile
@@ -1,6 +1,3 @@
-Content-type: text/plain; charset="us-ascii"
-Content-disposition: attachment; filename="mkfile"
-
 APE=/sys/src/ape
 < $APE/config
 <plan9/buildinfo
@@ -69,7 +66,7 @@ perlmain.c:	miniperl vms/writemain.pl
 			./miniperl vms/writemain.pl $extensions
 
 config.h:		config.plan9 plan9/fndvers
-			plan9/fndvers config.h 
+			plan9/fndvers 
 			cp config.h $archlib/CORE
 
 $perlshr(%):N:	%
@@ -80,8 +77,10 @@ $perlshr:  ${ext_obj:%=$perlshr(%)}
 IO.c:		miniperl ext/IO/IO.xs
 			./miniperl $privlib/ExtUtils/xsubpp -noprototypes -typemap $privlib/ExtUtils/typemap ext/IO/IO.xs > $target
 			cp ext/IO/*.pm $privlib
-			if (test !-d $privlib/IO) mkdir $privlib/IO
+			if (test !-d $privlib/IO) { 
+			mkdir $privlib/IO
 			cp ext/IO/lib/IO/*.pm $privlib/IO
+			 }
 
 Socket.$O:	config.h Socket.c
 			$CCCMD -I plan9 Socket.c
@@ -139,11 +138,9 @@ man:V:		$perlpods pod/pod2man.PL perl
 			for (i in $podnames) pod/pod2man pod/$i.pod > $installman3dir/$i
 			pod/pod2man plan9/perlplan9.pod > $installman3dir/perlplan9
 			
-nuke:V:	
+nuke clean:V:	
 		rm -f *.$O   $extensions^.pm config.sh $perllib config.h $perlshr perlmain.c perl miniperl $archlib/Config.pm $ext_c
-		
-clean:V:
-		rm -f *.$O config.sh  miniperl  t/perl
+		rm -rf $privlib/IO
 
 deleteman:V:
 			rm -f $installman1dir/perl* $installman3dir/perl*
diff --git a/plan9/perlplan9.doc b/plan9/perlplan9.doc
index 4f7a057749..5fc6e0f3a6 100644
--- a/plan9/perlplan9.doc
+++ b/plan9/perlplan9.doc
@@ -1,5 +1,5 @@
 
-     PERLTEST/PLAN9/PERLPLAN9(1)  (perl )  PERLTEST/PLAN9/PERLPLAN9(1)
+     PLAN9/PERLPLAN9(1)   (perl 5.003, patch 01)    PLAN9/PERLPLAN9(1)
 
      NNNNAAAAMMMMEEEE
           perlplan9 - Plan 9-specific documentation for Perl
@@ -34,8 +34,8 @@
 
           Although Plan 9 Perl currently only  provides static
           loading, it is built with a number of useful extensions.
-          These include Safe, FileHandle, Fcntl, and POSIX. Expect to
-          see others (and DynaLoading!) in the future.
+          These include Opcode, FileHandle, Fcntl, and POSIX. Expect
+          to see others (and DynaLoading!) in the future.
 
           WWWWhhhhaaaatttt''''ssss nnnnooootttt iiiinnnn PPPPllllaaaannnn 9999 PPPPeeeerrrrllll
 
@@ -52,9 +52,9 @@
 
           The functions not currently implemented include:
 
-     Page 1                      4/Jul/96             (printed 7/4/96)
+     Page 1                      6/Aug/96             (printed 8/6/96)
 
-     PERLTEST/PLAN9/PERLPLAN9(1)  (perl )  PERLTEST/PLAN9/PERLPLAN9(1)
+     PLAN9/PERLPLAN9(1)   (perl 5.003, patch 01)    PLAN9/PERLPLAN9(1)
 
               chown, chroot, dbmclose, dbmopen, getsockopt,
               setsockopt, recvmsg, sendmsg, getnetbyname,
@@ -82,10 +82,10 @@
           the world . . ." - Carl Sagan
 
      RRRReeeevvvviiiissssiiiioooonnnn ddddaaaatttteeee
-          This document was revised 04-July-1996 for Perl 5.003_1.
+          This document was revised 06-August-1996 for Perl 5.003_2.
 
      AAAAUUUUTTTTHHHHOOOORRRR
           Luther Huffman,    lutherh@stratcom.com
 
-     Page 2                      4/Jul/96             (printed 7/4/96)
+     Page 2                      6/Aug/96             (printed 8/6/96)
 
diff --git a/plan9/perlplan9.pod b/plan9/perlplan9.pod
index 9f13f06e7e..f632d45abf 100644
--- a/plan9/perlplan9.pod
+++ b/plan9/perlplan9.pod
@@ -34,7 +34,7 @@ Perl. These you won't need to be worried about.
 
 Although Plan 9 Perl currently only  provides static 
 loading, it is built with a number of useful extensions. 
-These include Safe, FileHandle, Fcntl, and POSIX. Expect 
+These include Opcode, FileHandle, Fcntl, and POSIX. Expect 
 to see others (and DynaLoading!) in the future.
 
 =head2 What's not in Plan 9 Perl
@@ -80,7 +80,7 @@ world . . ." - Carl Sagan
 
 =head1 Revision date
 
-This document was revised 04-July-1996 for Perl 5.003_1.
+This document was revised 06-August-1996 for Perl 5.003_2.
 
 =head1 AUTHOR
 
diff --git a/plan9/setup.rc b/plan9/setup.rc
index c6ebe86fc8..6ac56dfe99 100644
--- a/plan9/setup.rc
+++ b/plan9/setup.rc
@@ -6,6 +6,7 @@
 # Last modified 6/30/96 by:
 # Luther Huffman, Strategic Computer Solutions, Inc., lutherh@stratcom.com
 
+awk -f versnum ../patchlevel.h
 . buildinfo
 builddir = `{ cd .. ; pwd } 
 if(flag a) platforms = (386 mips sparc 68020)
diff --git a/plan9/versnum b/plan9/versnum
new file mode 100644
index 0000000000..83e46826c3
--- /dev/null
+++ b/plan9/versnum
@@ -0,0 +1,8 @@
+/PATCHLEVEL/ {base = $3}
+/SUBVERSION/ {subvers = $3}
+END {
+if (subvers == 0) 
+	printf "p9pvers = 5.%03d\n", base> "buildinfo";
+else
+	printf "p9pvers = 5.%03d_%02d\n" , base, subvers> "buildinfo";
+}