From: Justin Hunter Date: Mon, 27 Sep 2010 21:12:12 +0000 (-0700) Subject: add the field for later on X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=f24e48939a15ba970f17440b616c078b093db945;p=dbsrgits%2FSQL-Translator-2.0-ish.git add the field for later on --- diff --git a/t/13schema.t b/t/13schema.t index e5ae3cb..497ea75 100644 --- 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"' );