From 366f9dc700925177976108ca8730cb433312d34d Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Wed, 8 Aug 2001 17:14:43 +0000 Subject: change to do_pkgs --- perl-install/printer.pm | 5 ----- 1 file changed, 5 deletions(-) (limited to 'perl-install/printer.pm') diff --git a/perl-install/printer.pm b/perl-install/printer.pm index 1e4b11d0c..91e11bdf3 100644 --- a/perl-install/printer.pm +++ b/perl-install/printer.pm @@ -100,11 +100,6 @@ sub stop_service ($) { || die "Could not stop $service!"; } -sub remove_package ($) { - my ($package) = @_; - run_program::rooted($prefix, "rpm -e --nodeps $package") || do {}; -} - sub installed ($) { my ($package) = @_; open RPMCHECK, "rpm -qa --root $prefix/ | grep $package |" || -- cgit v1.2.1