projects
/
dbsrgits/DBIx-Class-UUIDColumns.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
a9efc7165e3dcd6089cdc1b255734a4bfd07d3e7
[dbsrgits/DBIx-Class-UUIDColumns.git]
/
t
/
lib
/
UUIDTest
/
Setup.pm
1
use strict;
2
use warnings;
3
use UUIDTest;
4
5
my $schema = UUIDTest->initialise;
6
7
$schema->storage->on_connect_do([ "PRAGMA synchronous = OFF" ]);
8
9
my $dbh = $schema->storage->dbh;
10
11
$schema->deploy;
12
13
$schema->storage->dbh->do("PRAGMA synchronous = OFF");
14
15
1;