diff options
| author | Till Kamppeter <tkamppeter@mandriva.com> | 2002-02-23 23:16:09 +0000 |
|---|---|---|
| committer | Till Kamppeter <tkamppeter@mandriva.com> | 2002-02-23 23:16:09 +0000 |
| commit | 47be67609da1955b24b40645f90a90653be26834 (patch) | |
| tree | dbd98014e6a25ad0777b3887d6ca3156493f89c5 /perl-install/printerdrake.pm | |
| parent | 7527d552a544aed46aa197ac7243793257cf63e5 (diff) | |
| download | drakx-47be67609da1955b24b40645f90a90653be26834.tar drakx-47be67609da1955b24b40645f90a90653be26834.tar.gz drakx-47be67609da1955b24b40645f90a90653be26834.tar.bz2 drakx-47be67609da1955b24b40645f90a90653be26834.tar.xz drakx-47be67609da1955b24b40645f90a90653be26834.zip | |
Added automatic configuration of printers in Star Office and Open Office.
Diffstat (limited to 'perl-install/printerdrake.pm')
| -rw-r--r-- | perl-install/printerdrake.pm | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/perl-install/printerdrake.pm b/perl-install/printerdrake.pm index 5cd012081..04d5a4e5e 100644 --- a/perl-install/printerdrake.pm +++ b/perl-install/printerdrake.pm @@ -2291,6 +2291,13 @@ sub main { $printer->{DEFAULT} = ''; } } + + # Configure the current printer queues in applications + { + my $w = $in->wait_message('', _("Configuring applications...")); + printer::configureapplications($printer); + } + if ($editqueue) { # The user was either in the printer modification dialog and did # not close it or he had set up a new queue and said that the test @@ -2799,6 +2806,14 @@ What do you want to modify on this printer?", $menushown || $in->ask_yesorno('',_("Do you want to configure another printer?"))); } + + # Configure the current printer queue in applications when main menu + # will not be shown (During installation in "Recommended" mode) + if ($::isInstall && !$::expert && !$menushown && !$continue) { + my $w = $in->wait_message('', _("Configuring applications...")); + printer::configureapplications($printer); + } + # Delete some variables $printer->{OLD_QUEUE} = ""; $printer->{QUEUE} = ""; |