summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install')
-rwxr-xr-xperl-install/standalone/service_harddrake3
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",