From 95d43b76bd7ad45b21f7645df7626ef63dabb082 Mon Sep 17 00:00:00 2001
From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Mon, 15 Apr 2002 12:52:58 +0000
Subject: return undef is of questionable style.

p4raw-id: //depot/perl@15924
---
 lib/Hash/Util.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'lib/Hash')

diff --git a/lib/Hash/Util.pm b/lib/Hash/Util.pm
index a1c9e64a54..f6dcd7e0a7 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
-- 
cgit v1.2.1