summaryrefslogtreecommitdiffstats
path: root/perl-install/standalone/drakbackup
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install/standalone/drakbackup')
-rwxr-xr-xperl-install/standalone/drakbackup7
1 files changed, 2 insertions, 5 deletions
diff --git a/perl-install/standalone/drakbackup b/perl-install/standalone/drakbackup
index 96044d9db..d1f4a4aaa 100755
--- a/perl-install/standalone/drakbackup
+++ b/perl-install/standalone/drakbackup
@@ -774,12 +774,9 @@ sub do_expect {
my ($mode, $filename) = @_;
- eval { require Expect; 1 };
+ eval { require Expect };
- if ($@ ne '') {
- $log_buff .= "perl-Expect not installed!";
- return(1);
- }
+ $@ and $log_buff .= "perl-Expect not installed!", return(1);
#- for debugging set to 1
$Expect::Exp_Internal = 0;