use Path::Class for finding subdirs of t and don't use global filehandle for slurping

[dbsrgits/DBIx-Class.git] / t / lib / testinclude / DBICTestAdminInc.pm

package DBICTestAdminInc;
use base 'DBIx::Class::Schema';

sub connect { exit 70 } # this is what the test will expect to see

1;