[dbsrgits/DBIx-Class-DeploymentHandler.git] / t / no-component-lib / DBICDHTest.pm

package DBICDHTest;

use strict;
use warnings;

use File::Path 'remove_tree';
use Test::More;
use Test::Exception;

sub ready {
   unlink 'db.db' if -e 'db.db';
   if (-d 't/sql') {
     remove_tree('t/sql');
     mkdir 't/sql';
   }
}

1;
Commit	Line	Data
53de57ed	1	package DBICDHTest;
	2
	3	use strict;
	4	use warnings;
	5
	6	use File::Path 'remove_tree';
	7	use Test::More;
	8	use Test::Exception;
	9
	10	sub ready {
	11	unlink 'db.db' if -e 'db.db';
	12	if (-d 't/sql') {
	13	remove_tree('t/sql');
	14	mkdir 't/sql';
	15	}
	16	}
	17
	18	1;