summaryrefslogtreecommitdiff
path: root/httemplate/search/cust_main.cgi
diff options
context:
space:
mode:
authorthalakan <thalakan>2001-10-10 06:22:22 +0000
committerthalakan <thalakan>2001-10-10 06:22:22 +0000
commitd0470bacdf52171067ccd5bb52d5a4c2993226dc (patch)
tree56b8071ea37490dbd77d66e5743970ca2a24465e /httemplate/search/cust_main.cgi
parent5e3669b83521736b7add66986f36f9c3096d187f (diff)
Reverted.
Diffstat (limited to 'httemplate/search/cust_main.cgi')
-rwxr-xr-xhttemplate/search/cust_main.cgi10
1 files changed, 4 insertions, 6 deletions
diff --git a/httemplate/search/cust_main.cgi b/httemplate/search/cust_main.cgi
index 0794ad0cb..4a3782194 100755
--- a/httemplate/search/cust_main.cgi
+++ b/httemplate/search/cust_main.cgi
@@ -1,5 +1,5 @@
<%
-#<!-- $Id: cust_main.cgi,v 1.9 2001-10-10 05:59:36 thalakan Exp $ -->
+#<!-- $Id: cust_main.cgi,v 1.10 2001-10-10 06:22:22 thalakan Exp $ -->
use strict;
#use vars qw( $conf %ncancelled_pkgs %all_pkgs $cgi @cust_main $sortby );
@@ -250,11 +250,9 @@ sub lastsearch {
$last_type{$_}++;
}
- my $cust_obj = new FS::cust_main;
- $cust_obj->setfield('last', $cgi->param('last_text'));
- my $error = $cust_obj->ut_name('last');
- eidiot "Illegal last name" if $error;
- my($last) = $cust_obj->getfield('last');
+ $cgi->param('last_text') =~ /^([\w \,\.\-\']*)$/
+ or eidiot "Illegal last name";
+ my($last)=$1;
if ( $last_type{'Exact'}
&& ! $last_type{'Fuzzy'}