fix two leaks in Thread.xs (from Eugene Alterman

[p5sagit/p5-mst-13.2.git] / ext / Thread / Thread / Specific.pm

diff --git a/ext/Thread/Thread/Specific.pm b/ext/Thread/Thread/Specific.pm
index 46b9b60..da3f937 100644 (file)
--- a/ext/Thread/Thread/Specific.pm
+++ b/ext/Thread/Thread/Specific.pm
@@ -15,14 +15,12 @@ C<key_create> returns a unique thread-specific key.
 
 =cut
 
-sub import {
-    use attrs qw(locked method);
+sub import : locked, method {
     require fields;
     fields::->import(@_);
 }      
 
-sub key_create {
-    use attrs qw(locked method);
+sub key_create : locked, method {
     return ++$FIELDS{__MAX__};
 }