summaryrefslogtreecommitdiff
path: root/httemplate/search
diff options
context:
space:
mode:
authorivan <ivan>2008-03-27 20:19:52 +0000
committerivan <ivan>2008-03-27 20:19:52 +0000
commit8d029daaa89e10b9a3e320cccfaad14714e19581 (patch)
tree4dad77ed2be286b953ef10d3cfebf1d8c704a694 /httemplate/search
parent1783fdb03ace7f8bc0b5236d1b3cd842753fd16d (diff)
resolve minor ACL glitch linking to payments
Diffstat (limited to 'httemplate/search')
-rwxr-xr-xhttemplate/search/cust_pay.cgi5
1 files changed, 4 insertions, 1 deletions
diff --git a/httemplate/search/cust_pay.cgi b/httemplate/search/cust_pay.cgi
index e5465aee8..80a611d97 100755
--- a/httemplate/search/cust_pay.cgi
+++ b/httemplate/search/cust_pay.cgi
@@ -235,7 +235,10 @@ if ( $cgi->param('magic') ) {
}
-my $link = [ "${p}view/cust_pay.html?paynum=", 'paynum' ];
+my $link = '';
+$link = [ "${p}view/cust_pay.html?paynum=", 'paynum' ]
+ if $FS::CurrentUser::CurrentUser->access_right('View invoices'); #XXX for now
+ #later# if $FS::CurrentUser::CurrentUser->access_right('View customer payments');
my $cust_link = sub {
my $cust_pay = shift;