From: Vincent Pit Date: Mon, 9 Nov 2015 12:47:32 +0000 (-0200) Subject: Also set the $^H lexical flag in unimport X-Git-Tag: v0.15~5 X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2FLexical-Types.git;a=commitdiff_plain;h=23c7f5b6ae98a9f7f1d9ef3384f11eb884a764bd Also set the $^H lexical flag in unimport --- 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; }