diff options
| author | ivan <ivan> | 2001-10-24 15:29:31 +0000 |
|---|---|---|
| committer | ivan <ivan> | 2001-10-24 15:29:31 +0000 |
| commit | e6b57805f6b3e76448ab9b6d280f2c53bc1410f3 (patch) | |
| tree | e05b4074ba546fa07a0da0587fb048b48ae21e23 /httemplate/search | |
| parent | 40927c9cd9472719a3720270256f4300b81ebc98 (diff) | |
preliminary web config editor
new config files: username-ampersand, passwordmax
fs-setup updates
get rid of old and crufty and unused registries/ config foo
documentation updates
Diffstat (limited to 'httemplate/search')
| -rwxr-xr-x | httemplate/search/svc_acct.cgi | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/httemplate/search/svc_acct.cgi b/httemplate/search/svc_acct.cgi index 37aed6115..64085ea93 100755 --- a/httemplate/search/svc_acct.cgi +++ b/httemplate/search/svc_acct.cgi @@ -1,5 +1,5 @@ <% -# <!-- $Id: svc_acct.cgi,v 1.5 2001-09-11 20:44:08 ivan Exp $ --> +# <!-- $Id: svc_acct.cgi,v 1.6 2001-10-24 15:29:31 ivan Exp $ --> use strict; use vars qw( $cgi @svc_acct $sortby $query $mydomain ); @@ -7,7 +7,7 @@ use CGI; use CGI::Carp qw(fatalsToBrowser); use FS::UID qw(cgisuidsetup); use FS::Record qw(qsearch qsearchs dbdef); -use FS::CGI qw(header eidiot popurl table); +use FS::CGI qw(header idiot popurl table); use FS::svc_acct; use FS::cust_main; @@ -54,9 +54,9 @@ if ( $query eq 'svcnum' ) { if ( scalar(@svc_acct) == 1 ) { my($svcnum)=$svc_acct[0]->svcnum; print $cgi->redirect(popurl(2). "view/svc_acct.cgi?$svcnum"); #redirect - exit; + #exit; } elsif ( scalar(@svc_acct) == 0 ) { #error - eidiot("Account not found"); + idiot("Account not found"); } else { my($total)=scalar(@svc_acct); print $cgi->header( '-expires' => 'now' ), |