Permalink
Browse files

Import namespace-clean-0.06.tar.gz.

  • Loading branch information...
1 parent 472d4b1 commit 99d2e6b61c03d29efc6848f563f67308cb0da816 @rafl committed Feb 19, 2008
Showing with 14 additions and 8 deletions.
  1. +5 −1 Changes
  2. +2 −2 META.yml
  3. +1 −1 README
  4. +6 −4 lib/namespace/clean.pm
View
@@ -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
View
@@ -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
View
@@ -2,7 +2,7 @@ NAME
namespace::clean - Keep imports and functions out of your namespace
VERSION
- 0.05
+ 0.06
SYNOPSIS
package Foo;
@@ -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

0 comments on commit 99d2e6b

Please sign in to comment.