diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2001-01-10 00:33:11 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2001-01-10 00:33:11 +0000 |
commit | 1883acd25096f34779cce40ebba76c5860964f0d (patch) | |
tree | 8f977a481321620d53a4af0d9e48a1898d481397 /perl-install/standalone/printerdrake | |
parent | 1bd398a1b3eae79192e9c0fce06173ec195caf69 (diff) | |
download | drakx-backup-do-not-use-1883acd25096f34779cce40ebba76c5860964f0d.tar drakx-backup-do-not-use-1883acd25096f34779cce40ebba76c5860964f0d.tar.gz drakx-backup-do-not-use-1883acd25096f34779cce40ebba76c5860964f0d.tar.bz2 drakx-backup-do-not-use-1883acd25096f34779cce40ebba76c5860964f0d.tar.xz drakx-backup-do-not-use-1883acd25096f34779cce40ebba76c5860964f0d.zip |
use standalone and standalone::pkgs_install
Diffstat (limited to 'perl-install/standalone/printerdrake')
-rwxr-xr-x | perl-install/standalone/printerdrake | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/perl-install/standalone/printerdrake b/perl-install/standalone/printerdrake index cee224da9..0ad84058c 100755 --- a/perl-install/standalone/printerdrake +++ b/perl-install/standalone/printerdrake @@ -21,8 +21,9 @@ use lib qw(/usr/lib/libDrakX); use interactive; -use printer; +use standalone; use printerdrake; +use printer; use c; local $_ = join '', @ARGV; @@ -35,7 +36,6 @@ $::auto = /-auto/; $::noauto = /-noauto/; $::skiptest = /-skiptest/; $::testing = /-testing/; -$::isStandalone = 1; my $printer; eval { $printer = printer::getinfo('') }; /-lpr/ and $printer->{mode} = 'lpr'; @@ -44,6 +44,6 @@ $printer->{mode} ||= 'CUPS'; #- assume this default if nothing found. my $in = vnew interactive('su'); -printerdrake::main($printer, $in, sub { $in->suspend; system("urpmi --auto --best-output " . join(' ', @_)); $in->resume; }); +printerdrake::main($printer, $in, sub { $in->standalone::pkgs_install(@_) }); $in->exit(0); |