From: ivan <ivan>
Date: Mon, 9 Feb 2009 11:45:19 +0000 (+0000)
Subject: pull out the data for address fields too!  RT#4583
X-Git-Tag: root_of_webpay_support~69
X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=commitdiff_plain;h=9925a640ebd475bf260b4d9e065b3f01e929e20a

pull out the data for address fields too!  RT#4583
---

diff --git a/FS/FS/UI/Web.pm b/FS/FS/UI/Web.pm
index 6386f9187..3c52ca547 100644
--- a/FS/FS/UI/Web.pm
+++ b/FS/FS/UI/Web.pm
@@ -332,9 +332,11 @@ sub cust_sql_fields {
 
   cust_header(@_);
   #inefficientish, but tiny lists and only run once per page
+
+  my @add_fields = qw( address1 address2 city state zip daytime night fax );
   push @fields,
     grep { my $field = $_; grep { $_ eq $field } @cust_fields }
-         qw( address1 address2 city state zip daytime night fax payby );
+         ( @add_fields, ( map "ship_$_", @add_fields ), 'payby' );
 
   my @extra_fields = ();
   if (grep { $_ eq 'current_balance' } @cust_fields) {