diff options
Diffstat (limited to 'perl-install/printerdrake.pm')
| -rw-r--r-- | perl-install/printerdrake.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/printerdrake.pm b/perl-install/printerdrake.pm index 32edbb867..394c105e5 100644 --- a/perl-install/printerdrake.pm +++ b/perl-install/printerdrake.pm @@ -2959,7 +2959,7 @@ sub wizard_close { $::Wizard_no_previous = 1; $::Wizard_no_cancel = 1; $::Wizard_finished = 1; - wizard_congratulations($in) if ($mode == 1); + wizard_congratulations($in) if $mode == 1; undef $::isWizard; $::WizardWindow->destroy if defined $::WizardWindow; undef $::WizardWindow; @@ -3364,7 +3364,7 @@ sub main { $queue = $printer->{QUEUE}; } }; - wizard_close($in, 0) if ($@ =~ /wizcancel/); + wizard_close($in, 0) if $@ =~ /wizcancel/; } else { $::expert or $printer->{TYPE} = "LOCAL"; wizard_welcome($printer, $in, $upNetwork) or next; |