From e6ca5aa275b8e33f1e32ee0a8bed7c7701637910 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tvignaud@mandriva.org>
Date: Thu, 19 Feb 2004 13:28:39 +0000
Subject: (set_usermode) do not die when run with --testing as user

---
 perl-install/printer/main.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/perl-install/printer/main.pm b/perl-install/printer/main.pm
index 1fa15d916..fa42e4b54 100644
--- a/perl-install/printer/main.pm
+++ b/perl-install/printer/main.pm
@@ -666,7 +666,7 @@ sub get_cups_autoconf() { $sysconfig{CUPS_CONFIG} ne 'manual' ? 1 : 0 }
 sub set_usermode {
     my ($usermode) = @_;
     $sysconfig{USER_MODE} = $usermode ? "expert" : "recommended";
-    setVarsInSh("$::prefix/etc/sysconfig/printing", \%sysconfig);
+    setVarsInSh("$::prefix/etc/sysconfig/printing", \%sysconfig) if !$::testing;
     return $usermode;
 }
 
-- 
cgit v1.2.1