diff options
| author | Till Kamppeter <tkamppeter@mandriva.com> | 2003-08-25 23:15:21 +0000 |
|---|---|---|
| committer | Till Kamppeter <tkamppeter@mandriva.com> | 2003-08-25 23:15:21 +0000 |
| commit | d1cc348191809530c80b35405317dbe21b999bfd (patch) | |
| tree | 025680838797ffb5b28da3da567d75632ce7670e /perl-install/printer/printerdrake.pm | |
| parent | a0be523710b157b40e483a72b1e4f59ebdcf804d (diff) | |
| download | drakx-backup-do-not-use-d1cc348191809530c80b35405317dbe21b999bfd.tar drakx-backup-do-not-use-d1cc348191809530c80b35405317dbe21b999bfd.tar.gz drakx-backup-do-not-use-d1cc348191809530c80b35405317dbe21b999bfd.tar.bz2 drakx-backup-do-not-use-d1cc348191809530c80b35405317dbe21b999bfd.tar.xz drakx-backup-do-not-use-d1cc348191809530c80b35405317dbe21b999bfd.zip | |
Distinguish between printers "Configured on this machine" and
"Configured on other machines", not any more "Local Printers" and
"Remote Printers", so the current dialog is compatible to the new GTK2
dialog.
Diffstat (limited to 'perl-install/printer/printerdrake.pm')
| -rw-r--r-- | perl-install/printer/printerdrake.pm | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/perl-install/printer/printerdrake.pm b/perl-install/printer/printerdrake.pm index 1db21ae67..fb81a8c2c 100644 --- a/perl-install/printer/printerdrake.pm +++ b/perl-install/printer/printerdrake.pm @@ -1662,7 +1662,7 @@ complete => sub { ); # Non-local printer, check network and abort if no network available - if ($printer->{currentqueue}{connect} !~ m!^(file|ptal):/! && + if ($printer->{currentqueue}{connect} !~ m!^(file|parallel|usb|serial|mtink|ptal://?mlc):/! && !check_network($printer, $in, $upNetwork, 0)) { return 0; } @@ -3665,14 +3665,14 @@ sub mainwindow_interactive { } # Generate the list of available printers my @printerlist = - sort((map { $printer->{configured}{$_}{queuedata}{menuentry} + (sort(map { $printer->{configured}{$_}{queuedata}{menuentry} . ($_ eq $printer->{DEFAULT} ? N(" (Default)") : "") } keys(%{$printer->{configured} || {}})), - ($printer->{SPOOLER} eq "cups" ? - printer::cups::get_formatted_remote_queues($printer) : - ())); + ($printer->{SPOOLER} eq "cups" ? + sort(printer::cups::get_formatted_remote_queues($printer)) : + ())); my $noprinters = $#printerlist < 0; # Position the cursor where it was before (in case # a button was pressed). @@ -3686,8 +3686,8 @@ sub mainwindow_interactive { # List the queues [ if_(!$noprinters, { val => \$menuchoice, format => \&translate, - sort => 0, separator => "!",tree_expanded => 1, - quit_if_double_click => 1,allow_empty_list =>1, + sort => 0, separator => "!", tree_expanded => 1, + quit_if_double_click => 1, allow_empty_list => 1, list => \@printerlist }), { clicked_may_quit => sub { |