diff options
-rwxr-xr-x | httemplate/search/cust_pay.cgi | 5 |
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; |