1 files changed, 0 insertions, 15 deletions
diff --git a/perl-install/printer.pm b/perl-install/printer.pm
index 91e11bdf3..6b5fe10df 100644
--- a/perl-install/printer.pm
+++ b/perl-install/printer.pm
@@ -100,21 +100,6 @@ sub stop_service ($) {
 	|| die "Could not stop $service!";
 }
 
-sub installed ($) {
-    my ($package) = @_;
-    open RPMCHECK, "rpm -qa --root $prefix/ | grep $package |" ||
-	die "Could not run rpm!";
-    my $found = 0;
-    while (<RPMCHECK>) {
-	if ($_ =~ m/^$package\-.+\-.+mdk/) {
-	    $found = 1;
-	    last;
-	}
-    }
-    close RPMCHECK;
-    return $found;
-}
-
 sub copy_printer_params($$) {
     my ($from, $to) = @_;
     map { $to->{$_} = $from->{$_} } grep { $_ ne 'configured' } keys %$from;