Import namespace-clean-0.06.tar.gz. 0.06
Florian Ragwitz [Tue, 19 Feb 2008 23:00:00 +0000 (00:00 +0100)]
Changes
META.yml
README
lib/namespace/clean.pm

diff --git a/Changes b/Changes
index 108c844..9914807 100644 (file)
--- a/Changes
+++ b/Changes
@@ -1,5 +1,9 @@
 
-    [0.05] 
+    [0.06] Wed Feb 20 15:09:00 CET 2008
+        - Fixed 'uninitialized value in ref-to-glob cast' error
+          if unimport was used before.
+
+    [0.05] Sun Aug 12 18:24:49 CEST 2007
         - Minor POD improvements
         - -except now accepts a single value too
 
index c1a93dd..ded02a6 100644 (file)
--- a/META.yml
+++ b/META.yml
@@ -18,9 +18,9 @@ no_index:
 provides: 
   namespace::clean: 
     file: lib/namespace/clean.pm
-    version: 0.05
+    version: 0.06
 requires: 
   Filter::EOF: 0.02
   Symbol: 0
 tests: t/*.t t_author/*.t
-version: 0.05
+version: 0.06
diff --git a/README b/README
index c655543..53a90ff 100644 (file)
--- a/README
+++ b/README
@@ -2,7 +2,7 @@ NAME
     namespace::clean - Keep imports and functions out of your namespace
 
 VERSION
-    0.05
+    0.06
 
 SYNOPSIS
       package Foo;
index d7c9a10..d11a7c4 100644 (file)
@@ -15,11 +15,11 @@ use Filter::EOF;
 
 =head1 VERSION
 
-0.05
+0.06
 
 =cut
 
-$VERSION     = 0.05;
+$VERSION     = 0.06;
 $STORAGE_VAR = '__NAMESPACE_CLEAN_STORAGE';
 
 =head1 SYNOPSIS
@@ -128,8 +128,10 @@ sub import {
                 no strict 'refs';
 
                 # keep original value to restore non-code slots
-                local *__tmp = *{ ${ "${cleanee}::" }{ $f } };
-                delete ${ "${cleanee}::" }{ $f };
+                {   no warnings 'uninitialized';    # fix possible unimports
+                    local *__tmp = *{ ${ "${cleanee}::" }{ $f } };
+                    delete ${ "${cleanee}::" }{ $f };
+                }
 
               SLOT:
                 # restore non-code slots to symbol