From c2291d42ccff39452769c2c5d1e62842765dcf7b Mon Sep 17 00:00:00 2001 From: Francois Pons Date: Fri, 17 Mar 2000 18:28:37 +0000 Subject: *** empty log message *** --- perl-install/standalone/printerdrake | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'perl-install/standalone') diff --git a/perl-install/standalone/printerdrake b/perl-install/standalone/printerdrake index 2e7ed085d..4903e3bc4 100755 --- a/perl-install/standalone/printerdrake +++ b/perl-install/standalone/printerdrake @@ -21,6 +21,7 @@ use lib qw(/usr/lib/libDrakX); use interactive; +use printer; use printerdrake; use c; @@ -42,6 +43,6 @@ my $f = "/usr/lib/rhs/rhs-printfilters"; my $in = vnew interactive('su'); -printerdrake::main('', printerdrake::getinfo(''), $in, sub { `urpmi --auto $_[0]` }); +printerdrake::main(eval { printer::getinfo('') } || {}, $in, sub { `urpmi --auto $_[0]` }); $in->exit(0); -- cgit v1.2.1