From 4f1f7a8c07df0031dd297d9b1b90c1acea2ec8fb Mon Sep 17 00:00:00 2001
From: Till Kamppeter <tkamppeter@mandriva.com>
Date: Mon, 12 Sep 2005 13:13:31 +0000
Subject: - Made configuring of auto queue setup mode also during installation 
  (some $::prefix were missing).

---
 perl-install/printer/printerdrake.pm | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

(limited to 'perl-install/printer/printerdrake.pm')

diff --git a/perl-install/printer/printerdrake.pm b/perl-install/printer/printerdrake.pm
index d2678ebd4..0bb61b0e5 100644
--- a/perl-install/printer/printerdrake.pm
+++ b/perl-install/printer/printerdrake.pm
@@ -615,7 +615,7 @@ sub config_auto_admin {
     my $nogui =
 	N("No pop-up windows, printer setup and package installation cannot be canceled");
     my $autoqueuesetupmode =
-	($printer->{autoqueuesetupgui} && -x "/usr/X11R6/bin/X") ? 
+	($printer->{autoqueuesetupgui} && -x "$::prefix/usr/X11R6/bin/X") ? 
 	$waitforgui : $nogui;
     if ($in->ask_from_
 	({ 
@@ -630,10 +630,10 @@ sub config_auto_admin {
 	      { text => N("when Printerdrake is started"), 
 		type => 'bool',
 		val => \$printer->{autoqueuesetuponstart} },
-	      if_(-x "/usr/X11R6/bin/X", 
+	      if_(-x "$::prefix/usr/X11R6/bin/X", 
 		  { val => N("Mode for automatic printer setup:") }),
 	      { val => \$autoqueuesetupmode,
-		list => [ if_(-x "/usr/X11R6/bin/X", $waitforgui), 
+		list => [ if_(-x "$::prefix/usr/X11R6/bin/X", $waitforgui), 
 			  $nogui ], 
 		not_edit => 1, sort => 0,
 		type => 'list' },
-- 
cgit v1.2.1