add error attr for back-compat

[dbsrgits/SQL-Translator-2.0-ish.git] / t / 13schema.t

diff --git a/t/13schema.t b/t/13schema.t
index e5ae3cb..7f77d54 100644 (file)
--- a/t/13schema.t
+++ b/t/13schema.t
@@ -202,6 +202,7 @@ require_ok( 'SQL::Translator::Object::View' );
     is( $f1->data_type('varchar'), 'varchar', 'Field data type is "varchar"' );
     is( $f1->size('30'), '30', 'Field size is "30"' );
     is( $f1->is_primary_key(0), '0', 'Field is_primary_key is negative' );
+    $person_table->add_field( $f1 );
 
     my %extra = $f1->extra;
     is( $extra{'foo'}, 'bar', 'Field extra "foo" is "bar"' );
@@ -624,8 +625,6 @@ TODO: {
         action              => $action,
     }) or die $s->error;
 
-    $t->add_database_event('insert');
-
     isa_ok( $t, 'SQL::Translator::Object::Trigger', 'Trigger' );
     isa_ok( $t->schema, 'SQL::Translator::Object::Schema', 'Schema' );
     is( $t->schema->name, 'TrigTest', qq[Schema name is "'TrigTest'"] );