summaryrefslogtreecommitdiffstats
path: root/perl-install/standalone/printerdrake
diff options
context:
space:
mode:
authorFrancois Pons <fpons@mandriva.com>2000-09-26 16:54:18 +0000
committerFrancois Pons <fpons@mandriva.com>2000-09-26 16:54:18 +0000
commitb8b170d87f522920b26b5117b32da974f4b7079e (patch)
tree4ec63c2abc0057a23cec0d31f02bbc6ce1bf77ca /perl-install/standalone/printerdrake
parente45ef56183cc4669183670c3eba2f1b0ce8a7194 (diff)
downloaddrakx-b8b170d87f522920b26b5117b32da974f4b7079e.tar
drakx-b8b170d87f522920b26b5117b32da974f4b7079e.tar.gz
drakx-b8b170d87f522920b26b5117b32da974f4b7079e.tar.bz2
drakx-b8b170d87f522920b26b5117b32da974f4b7079e.tar.xz
drakx-b8b170d87f522920b26b5117b32da974f4b7079e.zip
*** empty log message ***
Diffstat (limited to 'perl-install/standalone/printerdrake')
-rwxr-xr-xperl-install/standalone/printerdrake2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/standalone/printerdrake b/perl-install/standalone/printerdrake
index 615f3c8d0..dd41620fb 100755
--- a/perl-install/standalone/printerdrake
+++ b/perl-install/standalone/printerdrake
@@ -44,6 +44,6 @@ $printer->{mode} ||= 'cups'; #- assume this default if nothing found.
my $in = vnew interactive('su');
-printerdrake::main(eval { printer::getinfo('') } || {}, $in, sub { $in->suspend; system("urpmi --auto --best-output " . join(' ', @_)); $in->resume; });
+printerdrake::main($printer, $in, sub { $in->suspend; system("urpmi --auto --best-output " . join(' ', @_)); $in->resume; });
$in->exit(0);