--

diff --git a/perl/Triple.pm b/perl/Triple.pm
index 47603c8c84c33501a4c7e8f4ae6981e24a4b7d38..18d471e2eac19cf1485e3dc8458cf6fb3b2b1c9d 100644 (file)
--- a/perl/Triple.pm
+++ b/perl/Triple.pm
@@ -57,7 +57,7 @@ sub Triple::main {
         [ "Sneed", 2 ],
         );
     my @threads = (
-        @posts,
+        \@posts,
         );
 
     our $vars = {