X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2Fbin%2Ffreeside-adduser;h=2f4e22cbf4eca2f219b8b507ad708727525b7505;hb=fbdaf36fb33a44a453e23bc2dc8d18637b40dae9;hp=6bfb759f808f11e035887e4c9a89868421f4496f;hpb=ec5706f29a4b1d6826f150ed4e64bb79c4fe0cb7;p=freeside.git

diff --git a/FS/bin/freeside-adduser b/FS/bin/freeside-adduser
index 6bfb759f8..2f4e22cbf 100644
--- a/FS/bin/freeside-adduser
+++ b/FS/bin/freeside-adduser
@@ -9,6 +9,7 @@ my $FREESIDE_CONF = "%%%FREESIDE_CONF%%%";
 
 getopts("g:");
 my $user = shift or die &usage;
+my $password = shift;
 
 use FS::UID qw(adminsuidsetup);
 use FS::CurrentUser;
@@ -21,7 +22,7 @@ adminsuidsetup $user;
 
 my $access_user = new FS::access_user {
   'username'  => $user,
-  '_password' => '',
+  '_password' => $password,
   'first'     => 'Firstname', # $opt_f || 
   'last'      => 'Lastname',  # $opt_l || 
 };