diff options
author | Thierry Vignaud <tvignaud@mandriva.org> | 2002-07-08 15:11:48 +0000 |
---|---|---|
committer | Thierry Vignaud <tvignaud@mandriva.org> | 2002-07-08 15:11:48 +0000 |
commit | 5a79c6d9d4dc094f86f748f865fcdcbc9eae46ae (patch) | |
tree | 9db72786da1ebc47a9af397ffb6b964603f06733 /perl-install/standalone/service_harddrake | |
parent | 098ceae81e6df0996c660cd26983055c44eb5200 (diff) | |
download | drakx-backup-do-not-use-5a79c6d9d4dc094f86f748f865fcdcbc9eae46ae.tar drakx-backup-do-not-use-5a79c6d9d4dc094f86f748f865fcdcbc9eae46ae.tar.gz drakx-backup-do-not-use-5a79c6d9d4dc094f86f748f865fcdcbc9eae46ae.tar.bz2 drakx-backup-do-not-use-5a79c6d9d4dc094f86f748f865fcdcbc9eae46ae.tar.xz drakx-backup-do-not-use-5a79c6d9d4dc094f86f748f865fcdcbc9eae46ae.zip |
skip configuration on firt run
Diffstat (limited to 'perl-install/standalone/service_harddrake')
-rwxr-xr-x | perl-install/standalone/service_harddrake | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/perl-install/standalone/service_harddrake b/perl-install/standalone/service_harddrake index 3948d0a96..87574e35d 100755 --- a/perl-install/standalone/service_harddrake +++ b/perl-install/standalone/service_harddrake @@ -67,6 +67,7 @@ foreach (@harddrake::data::tree) { $config{$Ident} = \%ID; my $oldconfig = $previous_config->{$Ident}; + next if is_empty_hash_ref %$previous_config; my $msg; my @was_removed = difference2([ keys %$oldconfig ], [ keys %ID ]); @@ -76,8 +77,8 @@ foreach (@harddrake::data::tree) { my @added = difference2([ keys %ID ], [ keys %$oldconfig ]); $msg .= _("\nSome devices in the %s class were added:\n", $item) if @added; $msg .= "- $_ was added\n" foreach @added; - @added || @was_removed or next; + next unless (-x $configurator); if ($in->ask_okcancel("Hardware changes in $Ident class", |