This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Guarantee that, after unlocking, the hash is actually assignable.
authorJames E Keenan <jkeenan@cpan.org>
Thu, 30 Jul 2015 00:58:42 +0000 (20:58 -0400)
committerJames E Keenan <jkeenan@cpan.org>
Tue, 4 Aug 2015 23:54:32 +0000 (19:54 -0400)
commit0ddb27d769ebb30fe5ea10e4ee633e6df888cb3a
treeb7d3c18d6af1e24a5f3ac2eb94638805adb85185
parentd570e6e37e0b62a9ede7e8cdd602b9f432642fe3
Guarantee that, after unlocking, the hash is actually assignable.

Hash::Util::unlock_hashref_recurse(); Hash::Util::unlock_hash_recurse().

Thanks to report from Diab Jerius.

For: RT #125721
ext/Hash-Util/lib/Hash/Util.pm
ext/Hash-Util/t/Util.t