diff options
author | Pascal Rigaux <pixel@mandriva.com> | 1999-10-10 22:36:46 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 1999-10-10 22:36:46 +0000 |
commit | de08b3c99e81030d1455dc7b3bf869559a234495 (patch) | |
tree | 71639bb74323bb82e7203d84511e8b81702ca2fa /perl-install/install_steps.pm | |
parent | eaf1f7e94354b3bf37db6864de8364ffbda223f7 (diff) | |
download | drakx-backup-do-not-use-de08b3c99e81030d1455dc7b3bf869559a234495.tar drakx-backup-do-not-use-de08b3c99e81030d1455dc7b3bf869559a234495.tar.gz drakx-backup-do-not-use-de08b3c99e81030d1455dc7b3bf869559a234495.tar.bz2 drakx-backup-do-not-use-de08b3c99e81030d1455dc7b3bf869559a234495.tar.xz drakx-backup-do-not-use-de08b3c99e81030d1455dc7b3bf869559a234495.zip |
no_comment
Diffstat (limited to 'perl-install/install_steps.pm')
-rw-r--r-- | perl-install/install_steps.pm | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/perl-install/install_steps.pm b/perl-install/install_steps.pm index 353a0e1a1..9c916cc5b 100644 --- a/perl-install/install_steps.pm +++ b/perl-install/install_steps.pm @@ -59,6 +59,8 @@ sub leavingStep($$) { my ($o, $step) = @_; log::l("step `$step' finished"); + eval { commands::cp('-f', "/tmp/ddebug.log", "$o->{prefix}/root") } if -d "$o->{prefix}/root"; + $o->{steps}{$step}{reachable} = $o->{steps}{$step}{redoable}; while (my $f = shift @{$o->{steps}{$step}{toBeDone} || []}) { @@ -141,9 +143,9 @@ sub choosePartitionsToFormat($$) { unless ($_->{toFormat} = $_->{notFormatted} || $o->{partitioning}{autoformat}) { my $t = fsedit::typeOfPart($_->{device}); - $_->{toFormatUnsure} = + $_->{toFormatUnsure} = $_->{mntpoint} eq "/" || #- if detected dos/win, it's not precise enough to just compare the types (too many of them) - isFat({ type => $t }) ? !isFat($_) : $t != $_->{type}; + (isFat({ type => $t }) ? !isFat($_) : $t != $_->{type}); } } } |