Quote 'threads' in test.pl
authorVincent Pit <perl@profvince.com>
Thu, 23 Dec 2010 17:03:00 +0000 (18:03 +0100)
committerVincent Pit <perl@profvince.com>
Thu, 23 Dec 2010 17:03:00 +0000 (18:03 +0100)
If unquoted, it may throw a warning when threads.pm can't be loaded.

t/test.pl

index b58013d..088c7e3 100644 (file)
--- a/t/test.pl
+++ b/t/test.pl
@@ -981,7 +981,7 @@ sub watchdog ($;$)
     # Use a watchdog thread because either 'threads' is loaded,
     #   or fork() failed
     if (eval 'require threads; 1') {
-        threads->create(sub {
+        'threads'->create(sub {
                 # Load POSIX if available
                 eval { require POSIX; };