Change 34304 by [EMAIL PROTECTED] on 2008/09/07 11:59:05
"Can't modify division (/) in division (/)"...
Oh, that will be a // operator, then. Oops.
Affected files ...
... //depot/maint-5.8/perl/installman#9 edit
Differences ...
==== //depot/maint-5.8/perl/installman#9 (xtext) ====
Index: perl/installman
--- perl/installman#8~34289~ 2008-09-05 16:04:00.000000000 -0700
+++ perl/installman 2008-09-07 04:59:05.000000000 -0700
@@ -44,8 +44,10 @@
die $usage if $opts{help};
foreach my $pre (qw(man1 man3)) {
- $opts{"${pre}dir"} //= $opts{destdir} . $Config{"install${pre}dir"};
- $opts{"${pre}ext"} //= $Config{"${pre}ext"};
+ $opts{"${pre}dir"} = $opts{destdir} . $Config{"install${pre}dir"}
+ unless defined $opts{"${pre}dir"};
+ $opts{"${pre}ext"} = $Config{"${pre}ext"}
+ unless defined $opts{"${pre}ext"};
}
$opts{silent} ||= $opts{S};
$opts{notify} ||= $opts{n};
End of Patch.