summaryrefslogtreecommitdiffstats
path: root/perl-install/standalone/printerdrake
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2001-01-10 00:33:11 +0000
committerPascal Rigaux <pixel@mandriva.com>2001-01-10 00:33:11 +0000
commit1883acd25096f34779cce40ebba76c5860964f0d (patch)
tree8f977a481321620d53a4af0d9e48a1898d481397 /perl-install/standalone/printerdrake
parent1bd398a1b3eae79192e9c0fce06173ec195caf69 (diff)
downloaddrakx-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-xperl-install/standalone/printerdrake6
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);