testing dbicadmin/DBIx::Class::Admin integration

[dbsrgits/DBIx-Class.git] / t / dbicadmin-test-include / lib / Foo.pm

diff --git a/t/dbicadmin-test-include/lib/Foo.pm b/t/dbicadmin-test-include/lib/Foo.pm
index 2801e9e..1175c56 100644 (file)
--- a/t/dbicadmin-test-include/lib/Foo.pm
+++ b/t/dbicadmin-test-include/lib/Foo.pm
@@ -1,7 +1,9 @@
 package Foo;
+use base 'DBIx::Class::Schema';
 
 our $loaded = 1;
-
-sub connect {}
+our $deploy = 0;
+sub connect { bless {}, 'Foo' }
+sub deploy {$deploy = 1}
 
 1;