X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F746sybase.t;h=4bcc6dda7c97caa69e5aeeb558680d8cfe97ac73;hb=f3a9ea3d41f4d32346bc5ea7ce83a7dcfe45b118;hp=6b54699ae4f0a9c54d2429efc168166b502c3ac3;hpb=8138f96a9bb627e9f27cf9908532021217eb89b9;p=dbsrgits%2FDBIx-Class.git diff --git a/t/746sybase.t b/t/746sybase.t index 6b54699..4bcc6dd 100644 --- a/t/746sybase.t +++ b/t/746sybase.t @@ -346,10 +346,11 @@ SQL $dbh->do(qq[ CREATE TABLE bindtype_test ( - id INT IDENTITY PRIMARY KEY, - bytea IMAGE NULL, - blob IMAGE NULL, - clob TEXT NULL + id INT IDENTITY PRIMARY KEY, + bytea IMAGE NULL, + blob IMAGE NULL, + clob TEXT NULL, + a_memo IMAGE NULL ) ],{ RaiseError => 1, PrintError => 0 }); } @@ -441,11 +442,13 @@ SQL bytea => 1, blob => $binstr{large}, clob => $new_str, + a_memo => 2, }, { bytea => 1, blob => $binstr{large}, clob => $new_str, + a_memo => 2, }, ]); } 'insert_bulk with blobs does not die'; @@ -471,12 +474,14 @@ SQL bytea => 1, blob => $binstr{large}, clob => $new_str, + a_memo => 2, }, { id => 2, bytea => 1, blob => $binstr{large}, clob => $new_str, + a_memo => 2, }, ]); } 'insert_bulk with blobs and explicit identity does NOT die';