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
commit675325294d4b19c819c708751dc6d6a1b71564a3 (patch)
tree7b738a881f825c65fdbae43f45b8a9154181b73e /perl-install/standalone
parent9737fcaded446ecf8c91b564c6f1280aa8189bc7 (diff)
downloaddrakx-backup-do-not-use-675325294d4b19c819c708751dc6d6a1b71564a3.tar
drakx-backup-do-not-use-675325294d4b19c819c708751dc6d6a1b71564a3.tar.gz
drakx-backup-do-not-use-675325294d4b19c819c708751dc6d6a1b71564a3.tar.bz2
drakx-backup-do-not-use-675325294d4b19c819c708751dc6d6a1b71564a3.tar.xz
drakx-backup-do-not-use-675325294d4b19c819c708751dc6d6a1b71564a3.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();
}