X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=p5sagit%2FConfig-Any.git;a=blobdiff_plain;f=t%2F10-branches.t;h=eda0ae80c6c430d1420be0b769fe107b1789520b;hp=9041f099e0641904060e24520f00c6f0890bc4c1;hb=HEAD;hpb=cb49d8a43a30d223994063bb2abf5122a0ed1651 diff --git a/t/10-branches.t b/t/10-branches.t index 9041f09..eda0ae8 100644 --- a/t/10-branches.t +++ b/t/10-branches.t @@ -64,11 +64,11 @@ eval { Config::Any->load_files( { files => \@files, use_ext => 1, - filter => sub { die } + filter => sub { die "reject" } } ); }; -ok( $@, "filter breaks" ); +like $@, qr/reject/, "filter breaks"; my @stems = qw(t/supported/conf); ok( Config::Any->load_stems( { stems => \@stems, use_ext => 1 } ),