diff options
| author | Till Kamppeter <tkamppeter@mandriva.com> | 2002-08-28 16:25:22 +0000 |
|---|---|---|
| committer | Till Kamppeter <tkamppeter@mandriva.com> | 2002-08-28 16:25:22 +0000 |
| commit | c49ae686d5b9770861fbdaa860c81022808c3881 (patch) | |
| tree | 31f6fc316ea6aa0d4cfc2505d6337afb98ae8675 /perl-install/printerdrake.pm | |
| parent | 27fd3d851753ac9e25ae7c6ee4ac38c02d3bca97 (diff) | |
| download | drakx-c49ae686d5b9770861fbdaa860c81022808c3881.tar drakx-c49ae686d5b9770861fbdaa860c81022808c3881.tar.gz drakx-c49ae686d5b9770861fbdaa860c81022808c3881.tar.bz2 drakx-c49ae686d5b9770861fbdaa860c81022808c3881.tar.xz drakx-c49ae686d5b9770861fbdaa860c81022808c3881.zip | |
Printerdrake remembers now whether it was in normal mode or in expert
mode last time.
Diffstat (limited to 'perl-install/printerdrake.pm')
| -rw-r--r-- | perl-install/printerdrake.pm | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/perl-install/printerdrake.pm b/perl-install/printerdrake.pm index 64945a796..ebba01ed2 100644 --- a/perl-install/printerdrake.pm +++ b/perl-install/printerdrake.pm @@ -2916,6 +2916,10 @@ sub wizard_close { sub main { my ($printer, $in, $ask_multiple_printer, $upNetwork) = @_; + # Save the user mode, so that the same one is used on the next start + # of Printerdrake + printer::set_usermode($::expert); + # Default printer name, we do not use "lp" so that one can switch the # default printer under LPD without needing to rename another printer. # Under LPD the alias "lp" will be given to the default printer. @@ -3133,7 +3137,7 @@ sub main { ); # Toggle expert mode and standard mode if ($menuchoice eq "\@usermode") { - $::expert = !$::expert; + printer::set_usermode(!$::expert); # Read printer database for the new user mode %printer::thedb = (); #my $w = $in->wait_message(_("Printerdrake"), |