t/00-basic.t
changeset 20 2c6f22539c7f
parent 19 7c5787eaccb5
child 23 c52bb12b3ed0
--- a/t/00-basic.t	Wed Jun 01 00:16:29 2016 +0200
+++ b/t/00-basic.t	Wed Jun 01 00:18:52 2016 +0200
@@ -1,8 +1,8 @@
 use Test::More qw(no_plan);
 use Test::Exception;
 
-use_ok 'Nagios::Check::DNS::check_tlsa_record';
-can_ok 'Nagios::Check::DNS::check_tlsa_record', qw(dig_tlsa);
+use_ok 'Nagios::Check::DNS::check_tlsa_record' or BAIL_OUT;
+can_ok 'Nagios::Check::DNS::check_tlsa_record', qw(dig_tlsa) or BAIL_OUT;
 
 # The above package doesn't use the Exporter currently, for shortcut
 # reasons we import the relevant subs into *this* module
@@ -10,7 +10,6 @@
 
 # API conformance
 subtest 'API' => sub {
-    can_ok 'Nagios::Check::DNS::check_tlsa_record', qw(dig_tlsa);
     dies_ok { dig_tlsa('example.org') } 'API: dig_tlsa() missing port';
 };