X-Git-Url: http://git.vpit.fr/?a=blobdiff_plain;f=lib%2FBit%2FMorseSignals%2FReceiver.pm;h=874bb9a072617357b19f9d51c3e1135fc522fc6e;hb=72cae6c1d4dcdbfe9b437dc8a8949ce282bffeb0;hp=52f444bf4c07c719bf4f8759c8119a29da7744ac;hpb=d4cad38280f090c2057f4df1d6ef1fce88ccbcc6;p=perl%2Fmodules%2FBit-MorseSignals.git diff --git a/lib/Bit/MorseSignals/Receiver.pm b/lib/Bit/MorseSignals/Receiver.pm index 52f444b..874bb9a 100644 --- a/lib/Bit/MorseSignals/Receiver.pm +++ b/lib/Bit/MorseSignals/Receiver.pm @@ -25,7 +25,7 @@ our $VERSION = '0.06'; use Bit::MorseSignals::Receiver; - my $pants = new Bit::MorseSignals::Receiver 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); @@ -192,7 +192,7 @@ L, L. Vincent Pit, C<< >>, L. -You can contact me by mail or on #perl @ FreeNode (vincent or Prof_Vince). +You can contact me by mail or on C (vincent). =head1 BUGS