Get rid of the indirect notation

[perl/modules/Bit-MorseSignals.git] / t / 33-receiver-misformed.t

diff --git a/t/33-receiver-misformed.t b/t/33-receiver-misformed.t
index 9fde631e53f0cd1b6205e52d1cecd553a2cb9dc1..fc7a819b3904f29a73b3cbd239ab4889d0b5bef3 100644 (file)
--- a/t/33-receiver-misformed.t
+++ b/t/33-receiver-misformed.t
@@ -11,7 +11,7 @@ use Bit::MorseSignals::Receiver;
 
 my $hlagh;
 
-my $pants = new Bit::MorseSignals::Receiver done => sub { $hlagh = $_[1] };
+my $pants = Bit::MorseSignals::Receiver->new(done => sub { $hlagh = $_[1] });
 
 my $wrong = "\x{FF}\x{FF}";