]> git.vpit.fr Git - perl/modules/Bit-MorseSignals.git/commitdiff
POD verbatim paragraphs should fit into a terminal
authorVincent Pit <vince@profvince.com>
Fri, 23 Aug 2013 19:49:49 +0000 (16:49 -0300)
committerVincent Pit <vince@profvince.com>
Fri, 23 Aug 2013 19:49:49 +0000 (16:49 -0300)
lib/Bit/MorseSignals.pm
lib/Bit/MorseSignals/Receiver.pm

index 44501760e3b584ea8c9937abcdf00a1014584cc4..4df153d8ff3f2cbdc7b5d85f518b7bb3b9e8dbd1 100644 (file)
@@ -21,7 +21,9 @@ our $VERSION = '0.08';
     use Bit::MorseSignals::Receiver;
 
     my $deuce = Bit::MorseSignals::Emitter->new;
-    my $pants = Bit::MorseSignals::Receiver->new(done => sub { print $_[1], "\n" });
+    my $pants = Bit::MorseSignals::Receiver->new(
+     done => sub { print $_[1], "\n" },
+    );
 
     $deuce->post('HLAGH') for 1 .. 3;
     $pants->push while defined ($_ = $deuce->pop);
index 1eb7befe980215f25a39526ba1335299e42c68ce..be6458e1fc398f0ba7ca0f92272aa7bd27c8ba57 100644 (file)
@@ -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);