threads::shared 1.13
[p5sagit/p5-mst-13.2.git] / ext / threads / shared / t / 0nothread.t
index 0e5216e..0808277 100644 (file)
@@ -77,7 +77,7 @@ if ($threads::shared::VERSION && ! exists($ENV{'PERL_CORE'})) {
 array(24, [], 'Thing');
 hash(24, [], 'Thing');
 
-import threads::shared;
+threads::shared->import();
 
 share(\@array);
 array(24, 42, 'Thing');