From: Andreas König Date: Fri, 4 Oct 2002 06:38:57 +0000 (+0200) Subject: Re: Hash::Util::lock_keys inhibits bless X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=641c4430082a3fd1d8e803e65d696244a0104810;p=p5sagit%2Fp5-mst-13.2.git Re: Hash::Util::lock_keys inhibits bless Message-ID: p4raw-id: //depot/perl@17992 --- diff --git a/lib/Hash/Util.pm b/lib/Hash/Util.pm index 0c8979d..90a8e5a 100644 --- a/lib/Hash/Util.pm +++ b/lib/Hash/Util.pm @@ -59,10 +59,11 @@ This is intended to largely replace the deprecated pseudo-hashes. Restricts the given %hash's set of keys to @keys. If @keys is not given it restricts it to its current keyset. No more keys can be -added. delete() and exists() will still work, but it does not effect -the set of allowed keys. B: the current implementation does not -allow you to bless() the resulting hash, so if you want to use -lock_keys() for an object, you need to bless it prior to locking it. +added. delete() and exists() will still work, but will not alter +the set of allowed keys. B: the current implementation prevents +the hash from being bless()ed while it is in a locked state. Any attempt +to do so will raise an exception. Of course you can still bless() +the hash before you call lock_keys() so this shouldn't be a problem. unlock_keys(%hash);