Change 13448 by jhi@alpha on 2001/12/03 22:40:22
Subject: [PATCH perl@13440] VMS install fix-ups: add libnetcfg and xsubpp as
utility commands
From: "Craig A. Berry" <[EMAIL PROTECTED]>
Date: Mon, 03 Dec 2001 16:28:06 -0600
Message-Id: <5.1.0.14.2.20011202223303.01c3ab98@exchi01>
Affected files ...
.... //depot/perl/configure.com#134 edit
.... //depot/perl/lib/File/Basename.pm#26 edit
.... //depot/perl/vms/descrip_mms.template#52 edit
Differences ...
==== //depot/perl/configure.com#134 (text) ====
Index: perl/configure.com
--- perl/configure.com.~1~ Mon Dec 3 15:45:07 2001
+++ perl/configure.com Mon Dec 3 15:45:07 2001
@@ -6169,9 +6169,11 @@
$ ENDIF
$ WRITE CONFIG "$ h2ph == ""'"+"'Perl' ''vms_prefix':[utils]h2ph.com"""
$ WRITE CONFIG "$ h2xs == ""'"+"'Perl' ''vms_prefix':[utils]h2xs.com"""
+$ WRITE CONFIG "$ libnetcfg == ""'"+"'Perl' ''vms_prefix':[utils]libnetcfg.com"""
$ WRITE CONFIG "$!perlcc == ""'"+"'Perl' ''vms_prefix':[utils]perlcc.com"""
$ WRITE CONFIG "$ perlivp == ""'"+"'Perl' ''vms_prefix':[utils]perlivp.com"""
$ WRITE CONFIG "$ splain == ""'"+"'Perl' ''vms_prefix':[utils]splain.com"""
+$ WRITE CONFIG "$ xsubpp == ""'"+"'Perl' ''vms_prefix':[utils]xsubpp.com"""
$ ELSE
$ WRITE CONFIG "$ Perldoc == ""Perl ''vms_prefix':[lib.pod]Perldoc.com -t"""
$ WRITE CONFIG "$ pod2text == ""Perl pod2text"""
@@ -6186,9 +6188,11 @@
$ ENDIF
$ WRITE CONFIG "$ h2ph == ""Perl ''vms_prefix':[utils]h2ph.com"""
$ WRITE CONFIG "$ h2xs == ""Perl ''vms_prefix':[utils]h2xs.com"""
+$ WRITE CONFIG "$ libnetcfg == ""Perl ''vms_prefix':[utils]libnetcfg.com"""
$ WRITE CONFIG "$!perlcc == ""Perl ''vms_prefix':[utils]perlcc.com"""
$ WRITE CONFIG "$ perlivp == ""Perl ''vms_prefix':[utils]perlivp.com"""
$ WRITE CONFIG "$ splain == ""Perl ''vms_prefix':[utils]splain.com"""
+$ WRITE CONFIG "$ xsubpp == ""Perl ''vms_prefix':[utils]xsubpp.com"""
$ ENDIF
$ CLOSE CONFIG
$!
==== //depot/perl/lib/File/Basename.pm#26 (text) ====
Index: perl/lib/File/Basename.pm
--- perl/lib/File/Basename.pm.~1~ Mon Dec 3 15:45:07 2001
+++ perl/lib/File/Basename.pm Mon Dec 3 15:45:07 2001
@@ -197,6 +197,7 @@
my $devspec = $1;
my $remainder = $3;
($dirpath,$basename) = ($remainder =~ m#^(.*/)?(.*)#s);
+ $dirpath ||= ''; # should always be defined
$dirpath = $devspec.$dirpath;
}
$dirpath = './' unless $dirpath;
==== //depot/perl/vms/descrip_mms.template#52 (text) ====
Index: perl/vms/descrip_mms.template
--- perl/vms/descrip_mms.template.~1~ Mon Dec 3 15:45:07 2001
+++ perl/vms/descrip_mms.template Mon Dec 3 15:45:07 2001
@@ -327,8 +327,9 @@
# Modules which must be installed before we can build extensions
LIBPREREQ = $(ARCHDIR)Config.pm [.lib.VMS]Filespec.pm [.lib]DynaLoader.pm
[.lib]XSLoader.pm [.lib]lib.pm [.lib.ExtUtils]XSSymSet.pm $(ARCHDIR)vmspipe.com
[.lib]re.pm
-utils1 = [.lib.pod]perldoc.com [.lib.ExtUtils]Miniperl.pm [.utils]c2ph.com
[.utils]h2ph.com [.utils]h2xs.com [.lib]perlbug.com [.lib]perlcc.com
[.utils]dprofpp.com
-utils2 = [.utils]perlivp.com [.lib]splain.com [.utils]pl2pm.com
+utils1 = [.lib.pod]perldoc.com [.lib.ExtUtils]Miniperl.pm [.utils]c2ph.com
+[.utils]h2ph.com
+utils2 = [.utils]h2xs.com [.utils]libnetcfg.com [.lib]perlbug.com [.lib]perlcc.com
+[.utils]dprofpp.com
+utils3 = [.utils]perlivp.com [.lib]splain.com [.utils]pl2pm.com
+[.lib.ExtUtils]xsubpp.com
.ifdef NOX2P
all : base extras archcorefiles preplibrary perlpods
@@ -345,7 +346,7 @@
@ $(NOOP)
libmods : $(LIBPREREQ)
@ $(NOOP)
-utils : $(utils1) $(utils2)
+utils : $(utils1) $(utils2) $(utils3)
@ $(NOOP)
podxform : [.lib.pod]pod2text.com [.lib.pod]pod2html.com [.lib.pod]pod2latex.com
[.lib.pod]pod2man.com [.lib.pod]podchecker.com [.lib.pod]pod2usage.com
[.lib.pod]podselect.com
@ $(NOOP)
@@ -523,6 +524,9 @@
[.utils]h2xs.com : [.utils]h2xs.PL $(ARCHDIR)Config.pm
$(MINIPERL) $(MMS$SOURCE)
+[.utils]libnetcfg.com : [.utils]libnetcfg.PL $(ARCHDIR)Config.pm
+ $(MINIPERL) $(MMS$SOURCE)
+
[.lib]perlbug.com : [.utils]perlbug.PL $(ARCHDIR)Config.pm
$(MINIPERL) $(MMS$SOURCE)
Copy/Log [.utils]perlbug.com $(MMS$TARGET)
@@ -544,6 +548,9 @@
[.x2p]s2p.com : [.x2p]s2p.PL $(ARCHDIR)Config.pm
$(MINIPERL) $(MMS$SOURCE)
+[.lib.ExtUtils]xsubpp.com : [.lib.ExtUtils]xsubpp
+ Copy/Log $(MMS$SOURCE) $(MMS$TARGET)
+
# Rename catches problem with some DECC versions in which object file is
# placed in current default dir, not same one as source file.
[.x2p]$(DBG)a2p$(E) : [.x2p]a2p$(O), [.x2p]hash$(O), [.x2p]str$(O), [.x2p]util$(O),
[.x2p]walk$(O)
End of Patch.
