summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorThierry Vignaud <tvignaud@mandriva.org>2003-01-07 10:10:29 +0000
committerThierry Vignaud <tvignaud@mandriva.org>2003-01-07 10:10:29 +0000
commit413c17578b48fb0d8acccd0add4cda05fbbc6ca5 (patch)
treebe87fea7ca42dd42b22e67f2df84ea94f046ba88 /perl-install
parenteda7f64de494e314e5d7f2d1d648ba9f3622c0d6 (diff)
downloaddrakx-backup-do-not-use-413c17578b48fb0d8acccd0add4cda05fbbc6ca5.tar
drakx-backup-do-not-use-413c17578b48fb0d8acccd0add4cda05fbbc6ca5.tar.gz
drakx-backup-do-not-use-413c17578b48fb0d8acccd0add4cda05fbbc6ca5.tar.bz2
drakx-backup-do-not-use-413c17578b48fb0d8acccd0add4cda05fbbc6ca5.tar.xz
drakx-backup-do-not-use-413c17578b48fb0d8acccd0add4cda05fbbc6ca5.zip
beautify
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/printer/main.pm8
1 files changed, 4 insertions, 4 deletions
diff --git a/perl-install/printer/main.pm b/perl-install/printer/main.pm
index b7d1275a1..75b25e9d5 100644
--- a/perl-install/printer/main.pm
+++ b/perl-install/printer/main.pm
@@ -55,10 +55,10 @@ sub spooler {
sub printer_type($) {
my ($printer) = @_;
for ($printer->{SPOOLER}) {
- /cups/ && return @printer_type_inv{qw(LOCAL), qw(LPD SOCKET SMB), if_($::expert, qw(URI))};
- /lpd/ && return @printer_type_inv{qw(LOCAL LPD SOCKET SMB NCP), if_($::expert, qw(POSTPIPE URI))};
- /lprng/ && return @printer_type_inv{qw(LOCAL LPD SOCKET SMB NCP), if_($::expert, qw(POSTPIPE URI))};
- /pdq/ && return @printer_type_inv{qw(LOCAL LPD SOCKET), if_($::expert, qw(URI))};
+ /cups/ && return @printer_type_inv{qw(LOCAL LPD SOCKET SMB), if_($::expert, qw(URI))};
+ /lpd/ && return @printer_type_inv{qw(LOCAL LPD SOCKET SMB NCP), if_($::expert, qw(POSTPIPE URI))};
+ /lprng/ && return @printer_type_inv{qw(LOCAL LPD SOCKET SMB NCP), if_($::expert, qw(POSTPIPE URI))};
+ /pdq/ && return @printer_type_inv{qw(LOCAL LPD SOCKET), if_($::expert, qw(URI))};
}
}