From 3dfbfe06a0dba696baae6e1adda9438a5c0fd799 Mon Sep 17 00:00:00 2001
From: Till Kamppeter <tkamppeter@mandriva.com>
Date: Sun, 16 Sep 2001 22:40:55 +0000
Subject: Fixed bug which prevents printerdrake from running without PDQ
 installed.

---
 perl-install/printer.pm | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

diff --git a/perl-install/printer.pm b/perl-install/printer.pm
index 92559388f..f9462c556 100644
--- a/perl-install/printer.pm
+++ b/perl-install/printer.pm
@@ -1,4 +1,5 @@
 package printer;
+
 # $Id$
 
 #use diagnostics;
@@ -224,8 +225,10 @@ sub set_alternative {
 
 sub pdq_panic_button {
     my $setting = $_[0];
-    run_program::rooted($prefix, "/usr/sbin/pdqpanicbutton", "--$setting")
-	|| die "Could not $setting PDQ panic buttons!";
+    if (-f "/usr/sbin/pdqpanicbutton") {
+        run_program::rooted($prefix, "/usr/sbin/pdqpanicbutton", "--$setting")
+	    || die "Could not $setting PDQ panic buttons!";
+    }
 }
 
 sub copy_printer_params($$) {
-- 
cgit v1.2.1