avoid undefined error check variable.

git-svn-id: http://emdebian.org/svn/current@7775 563faec7-e20c-0410-992a-a66f704d0ccd
This commit is contained in:
codehelp 2011-02-17 17:26:40 +00:00
parent af316c5101
commit 9e6b354f2f

View file

@ -372,7 +372,7 @@ if ((defined $setupsh) and (-x $setupsh)) {
# run first set of hooks # run first set of hooks
&run_download_hooks(sort @{$hooks{'D'}}) if (defined $hooks{'D'}); &run_download_hooks(sort @{$hooks{'D'}}) if (defined $hooks{'D'});
my $err = &native if (not defined ($foreign) and $unpack eq "true"); my $err = &native if (not defined ($foreign) and $unpack eq "true");
if ($err != 0) { if (defined $err and $err != 0) {
warn (_g("Native mode configuration reported an error!\n")); warn (_g("Native mode configuration reported an error!\n"));
$warn_count++; $warn_count++;
} }