diff options
Diffstat (limited to 'perl-install/standalone/printerdrake')
-rwxr-xr-x | perl-install/standalone/printerdrake | 13 |
1 files changed, 1 insertions, 12 deletions
diff --git a/perl-install/standalone/printerdrake b/perl-install/standalone/printerdrake index 0369cd661..4f05e1ec2 100755 --- a/perl-install/standalone/printerdrake +++ b/perl-install/standalone/printerdrake @@ -30,18 +30,7 @@ use c; local $_ = join '', @ARGV; -/-h/ and die "usage: printerdrake [--beginner] [--expert] [--auto] [--noauto] [--skiptest] [--testing] [--cups] [--lprng] [--lpd] [--pdq]\n"; - -$::expert = 0; -if (/-expert/) { - $::expert = 1; -} elsif (/-beginner/) { - $::expert = 0; -} else { - printer::main::get_usermode (); -} -$::noauto = /-noauto/; -$::testing = /-testing/; +printer::main::get_usermode (); my $printer; |