From e9643bdc9a6d493b4b8e02f7949885e6e126c43e Mon Sep 17 00:00:00 2001
From: ivan <ivan>
Date: Wed, 30 Aug 2006 16:24:13 +0000
Subject: [PATCH] need a username arg for now... this should make the error
 message less confusing

---
 bin/mapsecrets2access_user | 8 +++++++-
 1 file changed, 7 insertions(+), 1 deletion(-)

diff --git a/bin/mapsecrets2access_user b/bin/mapsecrets2access_user
index 3fcd5069b..4efd90b2b 100755
--- a/bin/mapsecrets2access_user
+++ b/bin/mapsecrets2access_user
@@ -14,7 +14,8 @@ use FS::access_groupagent;
 use FS::agent;
 
 $FS::CurrentUser::upgrade_hack = 1;
-adminsuidsetup shift;
+my $user = shift or die &usage;
+adminsuidsetup $user;
 
 my $supergroup = qsearchs('access_group', { 'groupname' => 'Superuser' } );
 unless ( $supergroup ) {
@@ -77,3 +78,8 @@ cp $mapsecrets, "$mapsecrets.bak$$";
 open(MAPSECRETS, ">$mapsecrets") or die $!;
 print MAPSECRETS '* secrets'. "\n";
 close MAPSECRETS or die $!;
+
+sub usage {
+  die "Usage:\n  mapsecrets2access_user user\n"; 
+}
+
-- 
2.11.0