Also forcefully reset the localize hint flag for use indirect

[perl/modules/indirect.git] / lib / indirect.pm

diff --git a/lib/indirect.pm b/lib/indirect.pm
index c2854689ada8bd83045ebd52c063c230dabb9690..b0077c422fe2718c2d41452fdea93e4280a1f5fe 100644 (file)
--- a/lib/indirect.pm
+++ b/lib/indirect.pm
@@ -157,6 +157,7 @@ As explained in L</unimport>'s description, an C<use indirect> statement will le
 =cut
 
 sub import {
+ $^H |= 0x00020000;
  $^H{+(__PACKAGE__)} = _tag(undef);
  ();
 }