From cb0b8c862de7c7ab68b172faa29167f47894627b Mon Sep 17 00:00:00 2001
From: mark <mark>
Date: Wed, 22 Sep 2010 21:22:03 +0000
Subject: customer credit limits, RT#8209

---
 httemplate/edit/process/cust_main.cgi | 4 ++++
 1 file changed, 4 insertions(+)

(limited to 'httemplate/edit/process/cust_main.cgi')

diff --git a/httemplate/edit/process/cust_main.cgi b/httemplate/edit/process/cust_main.cgi
index 3158d7bbf..e2238bd67 100755
--- a/httemplate/edit/process/cust_main.cgi
+++ b/httemplate/edit/process/cust_main.cgi
@@ -73,6 +73,10 @@ if ( defined($cgi->param('same')) && $cgi->param('same') eq "Y" ) {
   );
 }
 
+if ( $cgi->param('no_credit_limit') ) {
+  $new->setfield('credit_limit', '');
+}
+
 $new->tagnum( [ $cgi->param('tagnum') ] );
 
 my %usedatetime = ( 'birthdate' => 1 );
-- 
cgit v1.2.1


From 8c7cc8814104fd6812477a476a2ed717c46d9417 Mon Sep 17 00:00:00 2001
From: mark <mark>
Date: Wed, 29 Sep 2010 00:38:08 +0000
Subject: avoid wiping signupdate when editing cust_main, RT#9972

---
 httemplate/edit/process/cust_main.cgi | 5 +++++
 1 file changed, 5 insertions(+)

(limited to 'httemplate/edit/process/cust_main.cgi')

diff --git a/httemplate/edit/process/cust_main.cgi b/httemplate/edit/process/cust_main.cgi
index e2238bd67..24cecea64 100755
--- a/httemplate/edit/process/cust_main.cgi
+++ b/httemplate/edit/process/cust_main.cgi
@@ -251,6 +251,11 @@ if ( $new->custnum eq '' ) {
     $new->payinfo($new_account.'@'.$new_aba);
   }
 
+  if ( ! $conf->exists('cust_main-edit_signupdate') or
+       ! $new->signupdate ) {
+    $new->signupdate($old->signupdate);
+  }
+
   warn "$me calling $new -> replace( $old, \ @invoicing_list )" if $DEBUG;
   local($FS::cust_main::DEBUG) = $DEBUG if $DEBUG;
   local($FS::Record::DEBUG)    = $DEBUG if $DEBUG;
-- 
cgit v1.2.1