rename_mv("$altdir/$name.dpkg-tmp","$altdir/$name") ||
&quit("unable to install $altdir/$name.dpkg-tmp as $altdir/$name: $!");
# Link slaves...
- for( my $slnum = 0; $slnum < @slavenames; $slnum++ ) {
+ for( my $slnum = 0; $slnum < @slavenames; $slnum++ ) {
my $slave = $slavenames[$slnum];
if ($slavepath{$preferred,$slnum} ne '') {
checked_symlink($slavepath{$preferred,$slnum},
checked_mv("$altdir/$slave.dpkg-tmp", "$altdir/$slave");
} else {
&&pr("Removing $slave ($slavelinks[$slnum]), not appropriate with $versions[$preferred].")
- if $verbosemode > 0;
+ if $verbosemode > 0;
unlink("$altdir/$slave") || $! == &ENOENT ||
&quit("unable to remove $altdir/$slave: $!");
}