X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=httemplate%2Fedit%2Fsvc_acct.cgi;h=ec4f66e2051eb085a73da0e106ef4aba6dc5dc95;hb=aa0a7b4128ed5cf56684378c9cb6ebc1c3ec8c1a;hp=8a558613eb07ace5bb404dabab032dd478e3ad5f;hpb=91387f8f489e561deaf1de052d80ef800a4970a3;p=freeside.git diff --git a/httemplate/edit/svc_acct.cgi b/httemplate/edit/svc_acct.cgi index 8a558613e..ec4f66e20 100755 --- a/httemplate/edit/svc_acct.cgi +++ b/httemplate/edit/svc_acct.cgi @@ -1,9 +1,10 @@ <% -# +# use strict; use vars qw( $conf $cgi @shells $action $svcnum $svc_acct $pkgnum $svcpart - $part_svc $svc $otaker $username $password $ulen $ulen2 $p1 + $part_svc $svc $otaker $username $password $ulen $ulen2 + $pmax $pmax2 $p1 $popnum $domsvc $uid $gid $finger $dir $shell $quota $slipip %svc_domain ); use CGI; @@ -100,8 +101,11 @@ if ( $svc_acct->_password ) { $ulen = $svc_acct->dbdef_table->column('username')->length; $ulen2 = $ulen+2; +$pmax = $conf->config('passwordmax') || 8; +$pmax2 = $pmax+2; + $p1 = popurl(1); -print $cgi->header( @FS::CGI::header ), header("$action $svc account"); +print header("$action $svc account"); print qq!Error: !, $cgi->param('error'), "

" @@ -121,7 +125,7 @@ print &itable("#cccccc",2), <Username Password - + (blank to generate) END