[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;

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

sub dbh {
  DBI->connect('dbi:SQLite::memory:', undef, undef, { RaiseError => 1 })
}

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;
53de57ed	8
53de57ed	9	sub ready {
53de57ed	10	if (-d 't/sql') {
	11	remove_tree('t/sql');
	12	mkdir 't/sql';
	13	}
	14	}
	15
f3b5161e	16	sub dbh {
	17	DBI->connect('dbi:SQLite::memory:', undef, undef, { RaiseError => 1 })
	18	}
	19
53de57ed	20	1;