| Current Path : /usr/share/doc/perl-DBIx-Class/t/lib/testinclude/ |
| Current File : //usr/share/doc/perl-DBIx-Class/t/lib/testinclude/DBICTestAdminInc.pm |
package DBICTestAdminInc;
use warnings;
use strict;
use base 'DBICTest::BaseSchema';
sub connect { exit 70 } # this is what the test will expect to see
1;