From 7e9b07f85193bb3ae3ebe638bc43a7901913cd4b Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Tue, 11 Jan 2005 11:20:57 +0000
Subject: do not log the encrypted password

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

(limited to 'perl-install/any.pm')

diff --git a/perl-install/any.pm b/perl-install/any.pm
index 1d7d34f43..c4a903e6f 100644
--- a/perl-install/any.pm
+++ b/perl-install/any.pm
@@ -72,7 +72,7 @@ sub create_user {
 	    }
 	}
 	require authentication;
-	run_program::rooted($::prefix, 
+	run_program::raw({ root => $::prefix, sensitive_arguments => 1 },
 			    'adduser', 
 			    '-p', authentication::user_crypted_passwd($u, $isMD5),
 			    if_($uid, '-u', $uid), if_($gid, '-g', $gid), 
-- 
cgit v1.2.1