X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F747mssql_ado.t;h=9ae7eb1f059cf0d7a6473205c8832419aec1a7a4;hb=74b5397c077a964ed301d18f5ccda72afa91f353;hp=3fd7af68e8e6716fc7d6734dd55444b6ca61fe05;hpb=49eeb48de3d8ff685926b595fa0f3f5e680eaee2;p=dbsrgits%2FDBIx-Class.git

diff --git a/t/747mssql_ado.t b/t/747mssql_ado.t
index 3fd7af6..9ae7eb1 100644
--- a/t/747mssql_ado.t
+++ b/t/747mssql_ado.t
@@ -19,6 +19,7 @@ my ($dsn, $user, $pass) = @ENV{map { "DBICTEST_MSSQL_ADO_${_}" } qw/DSN USER PAS
 plan skip_all => 'Set $ENV{DBICTEST_MSSQL_ADO_DSN}, _USER and _PASS to run this test'
   unless ($dsn && $user);
 
+require DBICTest::Schema;
 DBICTest::Schema->load_classes(qw/VaryingMAX ArtistGUID/);
 
 my %binstr = ( 'small' => join('', map { chr($_) } ( 1 .. 127 )) );
@@ -251,7 +252,9 @@ CREATE TABLE bindtype_test
   id     INT IDENTITY NOT NULL PRIMARY KEY,
   bytea  INT NULL,
   blob   IMAGE NULL,
+  blob2  IMAGE NULL,
   clob   TEXT NULL,
+  clob2  TEXT NULL,
   a_memo NTEXT NULL
 )
 ],{ RaiseError => 1, PrintError => 1 });