X-Git-Url: http://git.vpit.fr/?a=blobdiff_plain;f=t%2F02-can.t;h=c83fee3754803366585c70dd8a1ed445cbdb69a1;hb=HEAD;hp=f29e6361eb3a1597ee06b3e85fa7c6c76d283e00;hpb=8ce9fd9d5f4e6197d1a33a3fd11953cc1dc3b31f;p=perl%2Fmodules%2FBit-MorseSignals.git diff --git a/t/02-can.t b/t/02-can.t index f29e636..c83fee3 100644 --- a/t/02-can.t +++ b/t/02-can.t @@ -7,13 +7,13 @@ use Test::More tests => 9 + 5; require Bit::MorseSignals::Emitter; -for (qw/new post pop len pos 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 ' . $_); }