diff options
Diffstat (limited to 'perl-install/standalone')
-rwxr-xr-x | perl-install/standalone/printerdrake | 3 |
1 files changed, 2 insertions, 1 deletions
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); |