diff options
| author | ivan <ivan> | 2001-10-10 05:42:19 +0000 |
|---|---|---|
| committer | ivan <ivan> | 2001-10-10 05:42:19 +0000 |
| commit | 38b4a18a459a4fba3c73d4b46b2a08875413fec6 (patch) | |
| tree | 94250874132a97fb94b006b835bd805299f921e0 /httemplate | |
| parent | 5424f0aac49ed570bec0fb3c3342c4d2893e737e (diff) | |
revert silly changes
Diffstat (limited to 'httemplate')
| -rwxr-xr-x | httemplate/search/cust_main.cgi | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/httemplate/search/cust_main.cgi b/httemplate/search/cust_main.cgi index 7aa4021d6..0744744e8 100755 --- a/httemplate/search/cust_main.cgi +++ b/httemplate/search/cust_main.cgi @@ -1,5 +1,5 @@ <% -#<!-- $Id: cust_main.cgi,v 1.7 2001-10-10 05:33:43 thalakan Exp $ --> +#<!-- $Id: cust_main.cgi,v 1.8 2001-10-10 05:42:19 ivan Exp $ --> use strict; #use vars qw( $conf %ncancelled_pkgs %all_pkgs $cgi @cust_main $sortby ); @@ -9,7 +9,7 @@ use CGI::Carp qw(fatalsToBrowser); use IO::Handle; use String::Approx qw(amatch); use FS::UID qw(cgisuidsetup); -use FS::Record qw(qsearch qsearchs dbdef ut_name); +use FS::Record qw(qsearch qsearchs dbdef); use FS::CGI qw(header menubar eidiot popurl table); use FS::cust_main; use FS::cust_svc; @@ -250,8 +250,9 @@ sub lastsearch { $last_type{$_}++; } - my $error = ut_name($cgi->param('last_text')); - eidiot "Illegal last name" if $error; + $cgi->param('last_text') =~ /^([\w \,\.\-\']*)$/ + or eidiot "Illegal last name"; + my($last)=$1; if ( $last_type{'Exact'} && ! $last_type{'Fuzzy'} |