summaryrefslogtreecommitdiffstats
path: root/perl-install/standalone
diff options
context:
space:
mode:
authorThierry Vignaud <tv@mageia.org>2012-03-23 19:50:48 +0000
committerThierry Vignaud <tv@mageia.org>2012-03-23 19:50:48 +0000
commit9186647ea5fd7505f6920c2debfd4f9e2000458f (patch)
tree7b738a881f825c65fdbae43f45b8a9154181b73e /perl-install/standalone
parent0e8899e3f41e01d15f03727131dc71f9034eca12 (diff)
downloaddrakx-9186647ea5fd7505f6920c2debfd4f9e2000458f.tar
drakx-9186647ea5fd7505f6920c2debfd4f9e2000458f.tar.gz
drakx-9186647ea5fd7505f6920c2debfd4f9e2000458f.tar.bz2
drakx-9186647ea5fd7505f6920c2debfd4f9e2000458f.tar.xz
drakx-9186647ea5fd7505f6920c2debfd4f9e2000458f.zip
help perl_checker
Diffstat (limited to 'perl-install/standalone')
-rwxr-xr-xperl-install/standalone/finish-install1
-rwxr-xr-xperl-install/standalone/scannerdrake3
2 files changed, 3 insertions, 1 deletions
diff --git a/perl-install/standalone/finish-install b/perl-install/standalone/finish-install
index 9264436ad..a57c42a63 100755
--- a/perl-install/standalone/finish-install
+++ b/perl-install/standalone/finish-install
@@ -245,6 +245,7 @@ sub encrypt_home {
run_program::rooted($::prefix, 'umount', $home);
run_program::rooted($::prefix, 'cryptsetup', 'luksClose', $user->{name});
+ undef $wait;
}
sub call {
diff --git a/perl-install/standalone/scannerdrake b/perl-install/standalone/scannerdrake
index da7376813..112953b27 100755
--- a/perl-install/standalone/scannerdrake
+++ b/perl-install/standalone/scannerdrake
@@ -322,6 +322,7 @@ sub tryConfScanner {
modules::append_to_modules_loaded_at_startup_for_all_kernels($m);
}
}
+ undef $wait;
}
if ($scanner::scannerDB->{$model}{ask} =~ /DEVICE/ || !$port) {
$port ||= N("Auto-detect available ports");
@@ -505,7 +506,7 @@ sub mainwindow {
$in->wait_message(N("Please wait"),
N("Searching for new scanners..."));
my @f = scanner::detect(@configured);
- $wait = undef;
+ undef $wait;
if (@f) {
$changed = auto();
}