diff options
author | ivan <ivan> | 2009-12-29 04:49:02 +0000 |
---|---|---|
committer | ivan <ivan> | 2009-12-29 04:49:02 +0000 |
commit | bc7e4182153cbe1bfbd1cd2c4fd235f43ca3bf2c (patch) | |
tree | 204c5eb872f05f15c1d38fdde6eab6a5201de92e | |
parent | 9ed2aa6d3a1e63b1f56891c726e2151d0f15abc9 (diff) |
output SQL statements as we run them (and only the ones we run), not immediately
-rwxr-xr-x | FS/bin/freeside-upgrade | 7 |
1 files changed, 4 insertions, 3 deletions
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"; } |