From: ivan <ivan>
Date: Tue, 29 Dec 2009 04:49:01 +0000 (+0000)
Subject: output SQL statements as we run them (and only the ones we run), not immediately
X-Git-Tag: root_of_svc_elec_features~587
X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=commitdiff_plain;h=c27c62c2fe1c79811f389cc0d17c330157888d01

output SQL statements as we run them (and only the ones we run), not immediately
---

diff --git a/FS/bin/freeside-upgrade b/FS/bin/freeside-upgrade
index 5f9b0f718..49f1df846 100755
--- a/FS/bin/freeside-upgrade
+++ b/FS/bin/freeside-upgrade
@@ -41,9 +41,9 @@ reload_dbdef($dbdef_file);
 warn "Upgrade startup completed in ". (time-$start). " seconds\n"; # if $DEBUG;
 $start = time;
 
-$DBIx::DBSchema::DEBUG = $DEBUG;
-$DBIx::DBSchema::Table::DEBUG = $DEBUG;
-$DBIx::DBSchema::Index::DEBUG = $DEBUG;
+#$DBIx::DBSchema::DEBUG = $DEBUG;
+#$DBIx::DBSchema::Table::DEBUG = $DEBUG;
+#$DBIx::DBSchema::Index::DEBUG = $DEBUG;
 
 my @bugfix = ();
 
@@ -77,6 +77,7 @@ if ( $DRY_RUN ) {
   exit;
 } else {
   foreach my $statement ( @bugfix, @statements ) {
+    warn "$statement\n";
     $dbh->do( $statement )
       or die "Error: ". $dbh->errstr. "\n executing: $statement";
   }