summaryrefslogtreecommitdiffstats
path: root/perl-install/standalone/printerdrake
diff options
context:
space:
mode:
authorTill Kamppeter <tkamppeter@mandriva.com>2002-08-28 16:25:22 +0000
committerTill Kamppeter <tkamppeter@mandriva.com>2002-08-28 16:25:22 +0000
commitc49ae686d5b9770861fbdaa860c81022808c3881 (patch)
tree31f6fc316ea6aa0d4cfc2505d6337afb98ae8675 /perl-install/standalone/printerdrake
parent27fd3d851753ac9e25ae7c6ee4ac38c02d3bca97 (diff)
downloaddrakx-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/standalone/printerdrake')
-rwxr-xr-xperl-install/standalone/printerdrake9
1 files changed, 8 insertions, 1 deletions
diff --git a/perl-install/standalone/printerdrake b/perl-install/standalone/printerdrake
index a4190f1e1..f31ca3e68 100755
--- a/perl-install/standalone/printerdrake
+++ b/perl-install/standalone/printerdrake
@@ -31,7 +31,14 @@ local $_ = join '', @ARGV;
/-h/ and die "usage: printerdrake [--beginner] [--expert] [--auto] [--noauto] [--skiptest] [--testing] [--cups] [--lprng] [--lpd] [--pdq]\n";
-$::expert = /-expert/;
+$::expert = 0;
+if (/-expert/) {
+ $::expert = 1;
+} elsif (/-beginner/) {
+ $::expert = 0;
+} else {
+ printer::get_usermode ();
+}
$::noauto = /-noauto/;
$::testing = /-testing/;