X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F96file_column.t;h=d32e37342c4340e8ef5e376b1e056b95b3c5034c;hb=3b9c0e6a15fe8b0838194a0f96d6fc2d098c9d7d;hp=25d914923f2ac4e6df62f2c872ffda7e536be566;hpb=d4391b185237f3fc856805a699fb2cef993bcaad;p=dbsrgits%2FDBIx-Class-Historic.git

diff --git a/t/96file_column.t b/t/96file_column.t
index 25d9149..d32e373 100644
--- a/t/96file_column.t
+++ b/t/96file_column.t
@@ -8,11 +8,8 @@ use IO::File;
 
 my $schema = DBICTest->init_schema();
 
-plan tests => 2;
+plan tests => 1;
 
-
-eval { $schema->resultset('FileColumn')->create({file=>'wrong set'}) };
-ok($@, 'FileColumn checking for checks against bad sets');
-my $fh = new IO::File('t/96file_column.pm','r');
-eval { $schema->resultset('FileColumn')->create({file => {handle => $fh, filename =>'96file_column.pm'}})};
-ok(!$@,'FileColumn checking if file handled properly.');
+my $fh = new IO::File('t/96file_column.t','r');
+eval { $schema->resultset('FileColumn')->create({file => {handle => $fh, filename =>'96file_column.t'}})};
+cmp_ok($@,'eq','','FileColumn checking if file handled properly.');