integrate vmsperl contents into mainline

[perl5.git] / t / lib / thread.t

diff --git a/t/lib/thread.t b/t/lib/thread.t
index edfb443..6b3c800 100755 (executable)
--- 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";
     }