X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F74mssql.t;h=92b310311865a250efd837666c5d8866e809cb27;hb=5432c6ae1a31569775574edd42cb3e3f6f79cfff;hp=c5b4bb9c296d14c2fc79f6aa0f1c0c4e93ebdb0c;hpb=a0dd86798d8077ff1035441888165367b45572e5;p=dbsrgits%2FDBIx-Class-Historic.git diff --git a/t/74mssql.t b/t/74mssql.t index c5b4bb9..92b3103 100644 --- a/t/74mssql.t +++ b/t/74mssql.t @@ -30,7 +30,7 @@ $dbh->do("IF OBJECT_ID('cd', 'U') IS NOT NULL DROP TABLE cd"); $dbh->do("CREATE TABLE artist (artistid INT IDENTITY PRIMARY KEY, name VARCHAR(100), rank INT DEFAULT '13', charfield CHAR(10) NULL);"); -$dbh->do("CREATE TABLE cd (cdid INT IDENTITY PRIMARY KEY, artist INT, title VARCHAR(100), year VARCHAR(100), genreid INT NULL);"); +$dbh->do("CREATE TABLE cd (cdid INT IDENTITY PRIMARY KEY, artist INT, title VARCHAR(100), year VARCHAR(100), genreid INT NULL, single_track INT NULL);"); # Just to test compat shim, Auto is in Core $schema->class('Artist')->load_components('PK::Auto::MSSQL'); @@ -40,7 +40,7 @@ ok($new->artistid, "Auto-PK worked"); # Test LIMIT for (1..6) { - $schema->resultset('Artist')->create( { name => 'Artist ' . $_ } ); + $schema->resultset('Artist')->create( { name => 'Artist ' . $_, rank => $_ } ); } my $it = $schema->resultset('Artist')->search( { },