[freeside-commits] freeside/httemplate/search/elements cust_pay_or_refund.html, 1.1, 1.2

Ivan,,, ivan at wavetail.420.am
Sun Jun 1 15:48:17 PDT 2008


Update of /home/cvs/cvsroot/freeside/httemplate/search/elements
In directory wavetail.420.am:/tmp/cvs-serv3210/httemplate/search/elements

Modified Files:
	cust_pay_or_refund.html 
Log Message:
refactor payment history slightly, add refund receipts, have "unapplied" refunds show like other unapplied/open things, RT#3545

Index: cust_pay_or_refund.html
===================================================================
RCS file: /home/cvs/cvsroot/freeside/httemplate/search/elements/cust_pay_or_refund.html,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -d -r1.1 -r1.2
--- cust_pay_or_refund.html	19 May 2008 04:07:02 -0000	1.1
+++ cust_pay_or_refund.html	1 Jun 2008 22:48:15 -0000	1.2
@@ -242,10 +242,9 @@
 }
 
 my $link = '';
-if ( $thing eq 'pay' ) { #XXX no refund receipts yet
-  $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');
+if ( $FS::CurrentUser::CurrentUser->access_right('View invoices') #XXX for now
+     || $FS::CurrentUser::CurrentUser->access_right('View customer payments') ){
+  $link = [ "${p}view/cust_$thing.html?${thing}num=", $thing.'num' ]
 }
 
 my $cust_link = sub {



More information about the freeside-commits mailing list