[freeside-commits] freeside/httemplate/edit/process cust_credit_bill.cgi, 1.11, 1.12

[Jeff Finucane,420,,]

Update of /home/cvs/cvsroot/freeside/httemplate/edit/process
In directory wavetail.420.am:/tmp/cvs-serv6542/httemplate/edit/process

Modified Files:
	cust_credit_bill.cgi 
Log Message:
UI changes for credit applications include on the fly tax calculations #4729

Index: cust_credit_bill.cgi
===================================================================
RCS file: /home/cvs/cvsroot/freeside/httemplate/edit/process/cust_credit_bill.cgi,v
retrieving revision 1.11
retrieving revision 1.12
diff -u -d -r1.11 -r1.12
--- cust_credit_bill.cgi	5 Jun 2008 05:06:36 -0000	1.11
+++ cust_credit_bill.cgi	28 Oct 2009 19:01:18 -0000	1.12
@@ -10,4 +10,10 @@
 die "access denied"
   unless $FS::CurrentUser::CurrentUser->access_right('Apply credit');
 
+if ( $cgi->param('src_amount') ) {
+  die "access denied"
+    unless ( $FS::CurrentUser::CurrentUser->access_right('Post credit') &&
+           $FS::CurrentUser::CurrentUser->access_right('Delete credit') );
+}
+
 </%init>