[freeside-commits] freeside/FS/bin freeside-upgrade, 1.31.2.2, 1.31.2.3
Ivan,,,
ivan at wavetail.420.am
Mon Dec 28 20:49:04 PST 2009
Update of /home/cvs/cvsroot/freeside/FS/bin
In directory wavetail.420.am:/tmp/cvs-serv13049
Modified Files:
Tag: FREESIDE_1_9_BRANCH
freeside-upgrade
Log Message:
output SQL statements as we run them (and only the ones we run), not immediately
Index: freeside-upgrade
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/bin/freeside-upgrade,v
retrieving revision 1.31.2.2
retrieving revision 1.31.2.3
diff -u -d -r1.31.2.2 -r1.31.2.3
--- freeside-upgrade 29 Dec 2009 04:24:28 -0000 1.31.2.2
+++ freeside-upgrade 29 Dec 2009 04:49:02 -0000 1.31.2.3
@@ -41,9 +41,9 @@
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 @@
exit;
} else {
foreach my $statement ( @bugfix, @statements ) {
+ warn "$statement\n";
$dbh->do( $statement )
or die "Error: ". $dbh->errstr. "\n executing: $statement";
}
More information about the freeside-commits
mailing list