X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=bin%2Fcreate-history-tables;h=39248bf3f28e87eb62eb8d77ae61d5cd77f3d012;hp=33eb0e5a39fc336475a56a88328cef60d5df2a34;hb=348b6d6744d7bdb4359b29c9f117ed7263cfd16b;hpb=8965012fa53fd05d851d2f5abed4e056ab758797 diff --git a/bin/create-history-tables b/bin/create-history-tables index 33eb0e5a3..39248bf3f 100755 --- a/bin/create-history-tables +++ b/bin/create-history-tables @@ -18,8 +18,9 @@ my $schema = dbdef(); #false laziness w/fs-setup my @tables = scalar(@ARGV) ? @ARGV - : grep { ! /^h_/ } $schema->tables; + : grep { ! /^(h|pg)_/ } $schema->tables; foreach my $table ( @tables ) { + next if grep { /^h_$table/ } $schema->tables; warn "creating history table for $table\n"; my $tableobj = $schema->table($table) or die "unknown table $table (did you run dbdef-create?)\n";