X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=httemplate%2Fedit%2Fcust_main.cgi;h=bb2a8618eb2b0861f44b938ed231f772299efac2;hp=80fec935944b64ea18ba0e187d311bbade740247;hb=2c757d7db4cb6a7b9655de13206fcc84fb7ce61f;hpb=36197f0e2889826ddb9a64790150c7c232ba1afb
diff --git a/httemplate/edit/cust_main.cgi b/httemplate/edit/cust_main.cgi
index 80fec9359..bb2a8618e 100755
--- a/httemplate/edit/cust_main.cgi
+++ b/httemplate/edit/cust_main.cgi
@@ -397,49 +397,66 @@ unless ( $custnum ) {
if ( @part_pkg ) {
-# print "
First package", &itable("#cccccc", "0 ALIGN=LEFT"),
-#apiabuse & undesirable wrapping
- print "
First package", &ntable("#cccccc"),
- qq!
|
";
-
- #false laziness: (mostly) copied from edit/svc_acct.cgi
- #$ulen = $svc_acct->dbdef_table->column('username')->length;
- my $ulen = dbdef->table('svc_acct')->column('username')->length;
- my $ulen2 = $ulen+2;
- my $passwordmax = $conf->config('passwordmax') || 8;
- my $pmax2 = $passwordmax + 2;
- print <Username |
- |
-Password |
-
-(blank to generate) |
-END
-
- print 'Access number | '
- .
- &FS::svc_acct_pop::popselector($popnum).
- ' |
'
- ;
- }
-}
+ # print "
First package", &itable("#cccccc", "0 ALIGN=LEFT"),
+ #apiabuse & undesirable wrapping
+
+ %>
+
First package
+ <%= ntable("#cccccc") %>
+
+
+
+
+ |
+
+
+ <%
+ #false laziness: (mostly) copied from edit/svc_acct.cgi
+ #$ulen = $svc_acct->dbdef_table->column('username')->length;
+ my $ulen = dbdef->table('svc_acct')->column('username')->length;
+ my $ulen2 = $ulen+2;
+ my $passwordmax = $conf->config('passwordmax') || 8;
+ my $pmax2 = $passwordmax + 2;
+ %>
+
+
+ Username |
+
+ MAXLENGTH=<%= $ulen %>>
+ |
+
+
+
+ Password |
+
+ MAXLENGTH=<%= $passwordmax %>>
+ (blank to generate)
+ |
+
+
+
+ Access number |
+ <%= FS::svc_acct_pop::popselector($popnum) %> |
+
+
+
+ <% } %>
+
+<% } %>
-my $otaker = $cust_main->otaker;
-print qq!!,
- qq!
!,
- "