From c7fa2a3263d95944b0174ee9ac71d874e729e56b Mon Sep 17 00:00:00 2001 From: Till Kamppeter Date: Fri, 8 Feb 2002 16:23:08 +0000 Subject: Enabled transferring queues of HP multi-function devices between spoolers. --- perl-install/printer.pm | 3 +++ 1 file changed, 3 insertions(+) (limited to 'perl-install/printer.pm') diff --git a/perl-install/printer.pm b/perl-install/printer.pm index afbb2852c..55920b7b3 100644 --- a/perl-install/printer.pm +++ b/perl-install/printer.pm @@ -1373,6 +1373,7 @@ sub get_copiable_queues { # spooler? if ((($newspooler eq "cups") && (($entry->{connect} =~ /^file:/) || + ($entry->{connect} =~ /^ptal:/) || ($entry->{connect} =~ /^lpd:/) || ($entry->{connect} =~ /^socket:/) || ($entry->{connect} =~ /^smb:/) || @@ -1380,6 +1381,7 @@ sub get_copiable_queues { ((($newspooler eq "lpd") || ($newspooler eq "lprng")) && (($entry->{connect} =~ /^file:/) || + ($entry->{connect} =~ /^ptal:/) || ($entry->{connect} =~ /^lpd:/) || ($entry->{connect} =~ /^socket:/) || ($entry->{connect} =~ /^smb:/) || @@ -1387,6 +1389,7 @@ sub get_copiable_queues { ($entry->{connect} =~ /^postpipe:/))) || (($newspooler eq "pdq") && (($entry->{connect} =~ /^file:/) || + ($entry->{connect} =~ /^ptal:/) || ($entry->{connect} =~ /^lpd:/) || ($entry->{connect} =~ /^socket:/)))) { push(@queuelist, $entry->{name}); -- cgit v1.2.1