Change 18237 by pudge@pudge-mobile on 2002/12/03 03:31:20
Fix (already in 5.8) for not modifying @INC
Affected files ...
.... //depot/maint-5.6/macperl/ext/DynaLoader/DynaLoader_pm.PL#3 edit
Differences ...
==== //depot/maint-5.6/macperl/ext/DynaLoader/DynaLoader_pm.PL#3 (text) ====
Index: macperl/ext/DynaLoader/DynaLoader_pm.PL
--- macperl/ext/DynaLoader/DynaLoader_pm.PL#2~12580~ Mon Oct 22 12:21:37 2001
+++ macperl/ext/DynaLoader/DynaLoader_pm.PL Mon Dec 2 19:31:20 2002
@@ -244,8 +244,9 @@
chop($_ = VMS::Filespec::unixpath($_)) if $Is_VMS;
my $dir;
if ($Is_MacOS) {
- $_ .= ":" unless /:$/;
- $dir = "${_}auto:$modpname";
+ my $path = $_;
+ $path .= ":" unless /:$/;
+ $dir = "${path}auto:$modpname";
} else {
$dir = "$_/auto/$modpname";
}
End of Patch.