X-Git-Url: http://git.vpit.fr/?a=blobdiff_plain;f=lib%2FBit%2FMorseSignals%2FReceiver.pm;h=be6458e1fc398f0ba7ca0f92272aa7bd27c8ba57;hb=7311d27d4099d8c1f0e011db45d53a21853ff703;hp=1eb7befe980215f25a39526ba1335299e42c68ce;hpb=68eb455d71803aa45fd67f97c9dd628fff59e1c4;p=perl%2Fmodules%2FBit-MorseSignals.git diff --git a/lib/Bit/MorseSignals/Receiver.pm b/lib/Bit/MorseSignals/Receiver.pm index 1eb7bef..be6458e 100644 --- a/lib/Bit/MorseSignals/Receiver.pm +++ b/lib/Bit/MorseSignals/Receiver.pm @@ -25,7 +25,9 @@ our $VERSION = '0.08'; use Bit::MorseSignals::Receiver; - my $pants = Bit::MorseSignals::Receiver->new(done => sub { print "received $_[1]!\n" }); + my $pants = Bit::MorseSignals::Receiver->new( + done => sub { print "received $_[1]!\n" }, + ); while (...) { my $bit = comes_from_somewhere_lets_say_signals(); $pants->push($bit);