X-Git-Url: https://perl5.git.perl.org/perl5.git/blobdiff_plain/146174a91a192983720a158796dc066226ad0e55..b8fb4fa46ff90ee656eccccca4207196ce9b8b76:/t/lib/thread.t diff --git a/t/lib/thread.t b/t/lib/thread.t index edfb443..6b3c800 100755 --- a/t/lib/thread.t +++ b/t/lib/thread.t @@ -72,7 +72,7 @@ $t->join->join; { package Loch::Ness; sub new { bless [], shift } - sub monster : locked, method { + sub monster : locked : method { my($s, $m) = @_; print "ok $m\n"; }