Change 12593 by jhi@alpha on 2001/10/22 21:17:39
Integrate changes #12580 and #12581 from macperl;
Fix path construction.
(Copyright) Nit.
Affected files ...
... //depot/perl/ext/DynaLoader/DynaLoader_pm.PL#21 integrate
... //depot/perl/perl.c#381 integrate
Differences ...
==== //depot/perl/ext/DynaLoader/DynaLoader_pm.PL#21 (text) ====
Index: perl/ext/DynaLoader/DynaLoader_pm.PL
--- perl/ext/DynaLoader/DynaLoader_pm.PL.~1~ Mon Oct 22 15:30:05 2001
+++ perl/ext/DynaLoader/DynaLoader_pm.PL Mon Oct 22 15:30:05 2001
@@ -246,8 +246,8 @@
chop($_ = VMS::Filespec::unixpath($_)) if $Is_VMS;
my $dir;
if ($Is_MacOS) {
- chop $_ if /:$/;
- $dir = "$_:auto:$modpname";
+ $_ .= ":" unless /:$/;
+ $dir = "${_}auto:$modpname";
} else {
$dir = "$_/auto/$modpname";
}
==== //depot/perl/perl.c#381 (text) ====
Index: perl/perl.c
--- perl/perl.c.~1~ Mon Oct 22 15:30:05 2001
+++ perl/perl.c Mon Oct 22 15:30:05 2001
@@ -2413,7 +2413,8 @@
"\n\nCopyright 1987-2001, Larry Wall\n");
#ifdef MACOS_TRADITIONAL
PerlIO_printf(PerlIO_stdout(),
- "\nMac OS port Copyright (c) 1991-2001, Matthias Neeracher\n");
+ "\nMac OS port Copyright 1991-2001, Matthias Neeracher;\n"
+ "maintained by Chris Nandor\n");
#endif
#ifdef MSDOS
PerlIO_printf(PerlIO_stdout(),
End of Patch.