projects
/
freeside.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
6bb484c
)
fix customer searching with "List customers" right but not "List all customers",...
author
Ivan Kohler
<ivan@freeside.biz>
Thu, 27 Apr 2017 01:00:07 +0000
(18:00 -0700)
committer
Ivan Kohler
<ivan@freeside.biz>
Thu, 27 Apr 2017 01:00:07 +0000
(18:00 -0700)
httemplate/search/cust_main.cgi
patch
|
blob
|
history
diff --git
a/httemplate/search/cust_main.cgi
b/httemplate/search/cust_main.cgi
index
b2c977a
..
a5293f4
100755
(executable)
--- a/
httemplate/search/cust_main.cgi
+++ b/
httemplate/search/cust_main.cgi
@@
-329,7
+329,8
@@
my $curuser = $FS::CurrentUser::CurrentUser;
die "access denied"
my $curuser = $FS::CurrentUser::CurrentUser;
die "access denied"
- unless $curuser->access_right('List all customers');
+ unless $curuser->access_right('List all customers')
+ || $curuser->access_right('List customers');
my $conf = new FS::Conf;
my $maxrecords = $conf->config('maxsearchrecordsperpage') || 100;
my $conf = new FS::Conf;
my $maxrecords = $conf->config('maxsearchrecordsperpage') || 100;
@@
-586,7
+587,7
@@
sub cardsearch {
my($card)=$cgi->param('card');
$card =~ s/\D//g;
my($card)=$cgi->param('card');
$card =~ s/\D//g;
- $card =~ /^(\d{13,1
6
}|\d{8,9})$/ or errorpage(emt("Illegal card number"));
+ $card =~ /^(\d{13,1
9
}|\d{8,9})$/ or errorpage(emt("Illegal card number"));
my($payinfo)=$1;
[ qsearch('cust_main',{'payinfo'=>$payinfo, 'payby'=>'CARD'}),
my($payinfo)=$1;
[ qsearch('cust_main',{'payinfo'=>$payinfo, 'payby'=>'CARD'}),