X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F51threadtxn.t;h=eb3ee6abdb1550bcd8051828c26334ea9c09b43c;hb=55087b9990ac4c004f1e6b9742f73d89274cf7f2;hp=7af0ff883ebedf9ffcfbb5544f8d185a3b8f2cfa;hpb=b10cb676b8a6d5d6b1ced0fbc6b68ab789db0bfe;p=dbsrgits%2FDBIx-Class.git diff --git a/t/51threadtxn.t b/t/51threadtxn.t index 7af0ff8..eb3ee6a 100644 --- a/t/51threadtxn.t +++ b/t/51threadtxn.t @@ -8,7 +8,7 @@ use Config; BEGIN { plan skip_all => 'Your perl does not support ithreads' - if !$Config{useithreads} || $] < 5.008; + if !$Config{useithreads}; } use threads; @@ -44,7 +44,7 @@ eval { { local $SIG{__WARN__} = sub {}; eval { $dbh->do("DROP TABLE cd") }; - $dbh->do("CREATE TABLE cd (cdid serial PRIMARY KEY, artist INTEGER NOT NULL UNIQUE, title VARCHAR(100) NOT NULL UNIQUE, year VARCHAR(100) NOT NULL, genreid INTEGER);"); + $dbh->do("CREATE TABLE cd (cdid serial PRIMARY KEY, artist INTEGER NOT NULL UNIQUE, title VARCHAR(100) NOT NULL UNIQUE, year VARCHAR(100) NOT NULL, genreid INTEGER, single_track INTEGER);"); } $schema->resultset('CD')->create({ title => 'vacation in antarctica', artist => 123, year => 1901 });