From c49ae686d5b9770861fbdaa860c81022808c3881 Mon Sep 17 00:00:00 2001 From: Till Kamppeter Date: Wed, 28 Aug 2002 16:25:22 +0000 Subject: Printerdrake remembers now whether it was in normal mode or in expert mode last time. --- perl-install/printerdrake.pm | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) (limited to 'perl-install/printerdrake.pm') 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"), -- cgit v1.2.1