diff options
author | ivan <ivan> | 2009-12-29 04:49:01 +0000 |
---|---|---|
committer | ivan <ivan> | 2009-12-29 04:49:01 +0000 |
commit | c27c62c2fe1c79811f389cc0d17c330157888d01 (patch) | |
tree | 1375920aa2d2f22123675341dc7fb7e28ef01bfa /FS/bin | |
parent | e3cece3253b4540e18996502a9d41bb69f7f0688 (diff) |
output SQL statements as we run them (and only the ones we run), not immediately
Diffstat (limited to 'FS/bin')
-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"; } |