X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2FLexical-Types.git;a=blobdiff_plain;f=lib%2FLexical%2FTypes.pm;fp=lib%2FLexical%2FTypes.pm;h=531e0e82cf5c219e914564ca6c03d88b470ea9bf;hp=74c1150dd04a22067cb87aed49988e5394ffae1d;hb=23c7f5b6ae98a9f7f1d9ef3384f11eb884a764bd;hpb=a577e08689d69d6d5d0d7ba39d5e21770077b82a

diff --git a/lib/Lexical/Types.pm b/lib/Lexical/Types.pm
index 74c1150..531e0e8 100644
--- a/lib/Lexical/Types.pm
+++ b/lib/Lexical/Types.pm
@@ -177,6 +177,7 @@ Turns the pragma off.
 =cut
 
 sub unimport {
+ $^H |= 0x020000;
  $^H{+(__PACKAGE__)} = undef;
 }