X-Git-Url: http://git.vpit.fr/?a=blobdiff_plain;f=t%2F02-can.t;h=c83fee3754803366585c70dd8a1ed445cbdb69a1;hb=16fc0df47643288d3229f8671e339d89b159f155;hp=dc87461819f2a7c80d3753e1482e3958189513cc;hpb=f90efd6aef2e807ed35c07341456ce727d6668bc;p=perl%2Fmodules%2FBit-MorseSignals.git diff --git a/t/02-can.t b/t/02-can.t index dc87461..c83fee3 100644 --- a/t/02-can.t +++ b/t/02-can.t @@ -3,17 +3,17 @@ use strict; use warnings; -use Test::More tests => 7 + 5; +use Test::More tests => 9 + 5; require Bit::MorseSignals::Emitter; -for (qw/new post pop reset flush busy queued/) { +for (qw) { ok(Bit::MorseSignals::Emitter->can($_), 'BME can ' . $_); } require Bit::MorseSignals::Receiver; -for (qw/new push reset busy msg/) { +for (qw) { ok(Bit::MorseSignals::Receiver->can($_), 'BMR can ' . $_); }