X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=httemplate%2Fsearch%2Fcust_pay.cgi;h=80a611d97a9a1e9902e70b3b67fc15b04049835c;hp=e5465aee8d9e07b91ec0eb6dedcee0dcb123977e;hb=8d029daaa89e10b9a3e320cccfaad14714e19581;hpb=1783fdb03ace7f8bc0b5236d1b3cd842753fd16d

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;