X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Finflate%2Ffile_column.t;h=7f0eddd3a61251e43959d60230ace39e06caccd5;hb=60eb65471a0585681e161641ee0c6f6495d0a6e3;hp=639b12d5cf4d4ed50043193e01ed85f12660e108;hpb=c9d29bb255e00c9c734edfc9634b3ff24ad621ba;p=dbsrgits%2FDBIx-Class.git diff --git a/t/inflate/file_column.t b/t/inflate/file_column.t index 639b12d..7f0eddd 100644 --- a/t/inflate/file_column.t +++ b/t/inflate/file_column.t @@ -1,13 +1,22 @@ use strict; -use warnings; +use warnings; use Test::More; use lib qw(t/lib); + +# inject IC::File into the result baseclass for testing +BEGIN { + $ENV{DBIC_IC_FILE_NOWARN} = 1; + require DBICTest::BaseResult; + DBICTest::BaseResult->load_components (qw/InflateColumn::File/); +} + + use DBICTest; use File::Compare; use Path::Class qw/file/; -my $schema = DBICTest->init_schema(); +my $schema = DBICTest->init_schema; plan tests => 10;