X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=maint%2Fgen-schema.pl;h=907ed11cb1fde4e14807c4d128031786952f0455;hb=eeaf8701532fc357e64474642db30922849749db;hp=70e30ae15042812f5ed202a14025cefd9c18775b;hpb=ba19fccc5a38a4eb1eb25abbe181338f1dac9753;p=dbsrgits%2FDBIx-Class.git diff --git a/maint/gen-schema.pl b/maint/gen-schema.pl index 70e30ae..907ed11 100755 --- a/maint/gen-schema.pl +++ b/maint/gen-schema.pl @@ -4,11 +4,10 @@ use strict; use warnings; use lib qw(lib t/lib); -use DBICTest; use DBICTest::Schema; use SQL::Translator; -my $schema = DBICTest::Schema->connect(DBICTest->_database); +my $schema = DBICTest::Schema->connect; print scalar ($schema->storage->deployment_statements( $schema, 'SQLite',