summaryrefslogtreecommitdiffstats
path: root/perl-install/printer/main.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2002-12-13 11:14:48 +0000
committerPascal Rigaux <pixel@mandriva.com>2002-12-13 11:14:48 +0000
commit965508792300527e469c3fe141593696f3efde4d (patch)
treeaaa70a2b3013edf75cf72389d1994fbd1d33a9ca /perl-install/printer/main.pm
parent25430f59a831afcbef81d03d388332708492bf06 (diff)
downloaddrakx-965508792300527e469c3fe141593696f3efde4d.tar
drakx-965508792300527e469c3fe141593696f3efde4d.tar.gz
drakx-965508792300527e469c3fe141593696f3efde4d.tar.bz2
drakx-965508792300527e469c3fe141593696f3efde4d.tar.xz
drakx-965508792300527e469c3fe141593696f3efde4d.zip
put back the comment
Diffstat (limited to 'perl-install/printer/main.pm')
-rw-r--r--perl-install/printer/main.pm3
1 files changed, 3 insertions, 0 deletions
diff --git a/perl-install/printer/main.pm b/perl-install/printer/main.pm
index f136e057c..94975e1a9 100644
--- a/perl-install/printer/main.pm
+++ b/perl-install/printer/main.pm
@@ -654,6 +654,9 @@ sub read_cups_printer_list {
sub get_cups_remote_queues {
my ($printer) = @_;
+ # This function reads in a list of all remote printers which the local
+ # CUPS daemon knows due to broadcasting of remote servers or
+ # "BrowsePoll" entries in the local /etc/cups/cupsd.conf/
map {
join('!', if_($::expert, N("CUPS")), N("Remote Printers"), $_);
} map {
ranslate( ask_from_list($o, $title, $message, [ map { translate($_) } @$l ], translate($def)), @$l); } sub ask_from_list($$$$;$) { my ($o, $title, $message, $l, $def) = @_; $message = ref $message ? $message : [ $message ]; @$l > 10 and $l = [ sort @$l ]; $o->ask_from_listW($title, $message, $l, $def || $l->[0]); } sub ask_many_from_list($$$$;$) { my ($o, $title, $message, $l, $def) = @_; $message = ref $message ? $message : [ $message ]; $o->ask_many_from_listW($title, $message, $l, $def); }