Get rid of the indirect notation

[perl/modules/IPC-MorseSignals.git] / lib / IPC / MorseSignals / Emitter.pm

diff --git a/lib/IPC/MorseSignals/Emitter.pm b/lib/IPC/MorseSignals/Emitter.pm
index 163e5768d3926957d1f79ff6cd745b5579a5ef05..b5ba7e61fc2faaf843af553a01f37b1e2e3ebe67 100644 (file)
--- a/lib/IPC/MorseSignals/Emitter.pm
+++ b/lib/IPC/MorseSignals/Emitter.pm
@@ -26,7 +26,7 @@ our $VERSION = '0.15';
 
     use IPC::MorseSignals::Emitter;
 
-    my $deuce = new IPC::MorseSignals::Emitter speed => 1024;
+    my $deuce = IPC::MorseSignals::Emitter->new(speed => 1024);
     $deuce->post('HLAGH') for 1 .. 3;
     $deuce->send($pid);