X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2Fbin%2Ffreeside-adduser;h=2f4e22cbf4eca2f219b8b507ad708727525b7505;hb=470878235c5f61ca7acc6ef618943071ca9736b5;hp=6bfb759f808f11e035887e4c9a89868421f4496f;hpb=3d0a1bb06b895c5be6e3f0517d355442a6b1e125;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 || 
 };