[freeside-commits] branch master updated. aa1210004d3249eb1c9616f748b97f2ce91de9ae

Ivan ivan at 420.am
Sat Jun 2 00:39:08 PDT 2012


The branch, master has been updated
       via  aa1210004d3249eb1c9616f748b97f2ce91de9ae (commit)
      from  bfd4099ae2a262e4f31e42f498f85b374ef33c36 (commit)

Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we list those
revisions in full, below.

- Log -----------------------------------------------------------------
commit aa1210004d3249eb1c9616f748b97f2ce91de9ae
Author: Ivan Kohler <ivan at freeside.biz>
Date:   Sat Jun 2 00:39:05 2012 -0700

    time parts of cust_main upgrade, RT#17629

diff --git a/FS/FS/cust_main.pm b/FS/FS/cust_main.pm
index d4ddacc..d18ec1c 100644
--- a/FS/FS/cust_main.pm
+++ b/FS/FS/cust_main.pm
@@ -5057,9 +5057,12 @@ sub _upgrade_data { #class method
     #DCRD to be safe
     "UPDATE cust_main SET payby = 'DCRD' WHERE payby = 'BILL' and length(payinfo) = 16 and payinfo ". regexp_sql. q( '^[0-9]*$' );
 
+  my $t = time;
   foreach my $sql ( @statements ) {
     my $sth = dbh->prepare($sql) or die dbh->errstr;
     $sth->execute or die $sth->errstr;
+    warn (time - $t). " seconds\n";
+    $t = time;
   }
 
   local($ignore_expired_card) = 1;

-----------------------------------------------------------------------

Summary of changes:
 FS/FS/cust_main.pm |    3 +++
 1 files changed, 3 insertions(+), 0 deletions(-)




More information about the freeside-commits mailing list