diff options
author | Thierry Vignaud <tv@mageia.org> | 2012-03-23 19:50:48 +0000 |
---|---|---|
committer | Thierry Vignaud <tv@mageia.org> | 2012-03-23 19:50:48 +0000 |
commit | 9186647ea5fd7505f6920c2debfd4f9e2000458f (patch) | |
tree | 7b738a881f825c65fdbae43f45b8a9154181b73e /perl-install/standalone | |
parent | 0e8899e3f41e01d15f03727131dc71f9034eca12 (diff) | |
download | drakx-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-x | perl-install/standalone/finish-install | 1 | ||||
-rwxr-xr-x | perl-install/standalone/scannerdrake | 3 |
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(); } |