From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Mon, 15 Apr 2002 12:52:58 +0000 (+0000)
Subject: return undef is of questionable style.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=95d43b76bd7ad45b21f7645df7626ef63dabb082;p=p5sagit%2Fp5-mst-13.2.git

return undef is of questionable style.

p4raw-id: //depot/perl@15924
---

diff --git a/lib/Hash/Util.pm b/lib/Hash/Util.pm
index a1c9e64..f6dcd7e 100644
--- a/lib/Hash/Util.pm
+++ b/lib/Hash/Util.pm
@@ -94,14 +94,14 @@ sub lock_keys (\%;@) {
         Internals::SvREADONLY %$hash, 1;
     }
 
-    return undef;
+    return;
 }
 
 sub unlock_keys (\%) {
     my($hash) = shift;
 
     Internals::SvREADONLY %$hash, 0;
-    return undef;
+    return;
 }
 
 =item lock_value