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