diff options
Diffstat (limited to 'cpan/Test-Simple/t/Tester/tbt_03die.t')
-rw-r--r-- | cpan/Test-Simple/t/Tester/tbt_03die.t | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/cpan/Test-Simple/t/Tester/tbt_03die.t b/cpan/Test-Simple/t/Tester/tbt_03die.t new file mode 100644 index 0000000000..b9dba801eb --- /dev/null +++ b/cpan/Test-Simple/t/Tester/tbt_03die.t @@ -0,0 +1,12 @@ +#!/usr/bin/perl + +use Test::Builder::Tester tests => 1; +use Test::More; + +eval { + test_test("foo"); +}; +like($@, + "/Not testing\. You must declare output with a test function first\./", + "dies correctly on error"); + |