From 7713001472b5ae2ba7d89160c79c07ff6eb81d31 Mon Sep 17 00:00:00 2001
From: dakkar <dakkar@thenautilus.net>
Date: Sun, 11 Jul 2010 21:56:41 +0100
Subject: test for TT::Thread->master

---
 lib/Thread/Task/Thread.pm | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

(limited to 'lib/Thread/Task/Thread.pm')

diff --git a/lib/Thread/Task/Thread.pm b/lib/Thread/Task/Thread.pm
index e922549..2d7880d 100644
--- a/lib/Thread/Task/Thread.pm
+++ b/lib/Thread/Task/Thread.pm
@@ -20,8 +20,7 @@ class Thread::Task::Thread {
     my $SINGLETON;
 
     method master(ClassName $class:) {
-        $SINGLETON
-            or $class->new->spawn;
+        $SINGLETON ||= $class->new->spawn;
     }
 
     method import(ClassName $class: @rest) {
-- 
cgit v1.2.3