]> git.vpit.fr Git - perl/modules/Lexical-Types.git/commitdiff
Also set the $^H lexical flag in unimport
authorVincent Pit <perl@profvince.com>
Mon, 9 Nov 2015 12:47:32 +0000 (10:47 -0200)
committerVincent Pit <perl@profvince.com>
Mon, 9 Nov 2015 12:47:32 +0000 (10:47 -0200)
lib/Lexical/Types.pm

index 74c1150dd04a22067cb87aed49988e5394ffae1d..531e0e82cf5c219e914564ca6c03d88b470ea9bf 100644 (file)
@@ -177,6 +177,7 @@ Turns the pragma off.
 =cut
 
 sub unimport {
+ $^H |= 0x020000;
  $^H{+(__PACKAGE__)} = undef;
 }