warn "creating history table for $table\n";
my $tableobj = $schema->table($table)
or die "unknown table $table (did you run dbdef-create?)\n";
warn "creating history table for $table\n";
my $tableobj = $schema->table($table)
or die "unknown table $table (did you run dbdef-create?)\n";