summaryrefslogtreecommitdiffstats
path: root/perl-install/install_steps.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2000-10-23 15:40:46 +0000
committerPascal Rigaux <pixel@mandriva.com>2000-10-23 15:40:46 +0000
commitc555e7d62df38a839bb243347062cead77f89922 (patch)
treef4b10551ab95f1301ce8b55aa015762512d4fdd9 /perl-install/install_steps.pm
parent64a16a8f78ae8828eb723b587ee291c47e005ff0 (diff)
downloaddrakx-backup-do-not-use-c555e7d62df38a839bb243347062cead77f89922.tar
drakx-backup-do-not-use-c555e7d62df38a839bb243347062cead77f89922.tar.gz
drakx-backup-do-not-use-c555e7d62df38a839bb243347062cead77f89922.tar.bz2
drakx-backup-do-not-use-c555e7d62df38a839bb243347062cead77f89922.tar.xz
drakx-backup-do-not-use-c555e7d62df38a839bb243347062cead77f89922.zip
added some carriage returns to please jl :)
Diffstat (limited to 'perl-install/install_steps.pm')
-rw-r--r--perl-install/install_steps.pm6
1 files changed, 4 insertions, 2 deletions
diff --git a/perl-install/install_steps.pm b/perl-install/install_steps.pm
index bc93ae6ba..6efde2f53 100644
--- a/perl-install/install_steps.pm
+++ b/perl-install/install_steps.pm
@@ -337,13 +337,15 @@ sub installPackages($$) { #- complete REWORK, TODO and TOCHECK!
#- important files and restore them after.
foreach (@{$o->{toSave} || []}) {
if (-e "$o->{prefix}/$_") {
- unlink "$o->{prefix}/$_.mdkgisave"; eval { commands::cp("$o->{prefix}/$_", "$o->{prefix}/$_.mdkgisave") };
+ unlink "$o->{prefix}/$_.mdkgisave";
+ eval { commands::cp("$o->{prefix}/$_", "$o->{prefix}/$_.mdkgisave") };
}
}
pkgs::remove($o->{prefix}, $o->{toRemove});
foreach (@{$o->{toSave} || []}) {
if (-e "$o->{prefix}/$_.mdkgisave") {
- unlink "$o->{prefix}/$_"; rename "$o->{prefix}/$_.mdkgisave", "$o->{prefix}/$_";
+ unlink "$o->{prefix}/$_";
+ rename "$o->{prefix}/$_.mdkgisave", "$o->{prefix}/$_";
}
}
$o->{toSave} = [];