From: erickson <erickson@9efc2488-bf62-4759-914b-345cdb29e865>
Date: Mon, 7 Mar 2005 22:17:47 +0000 (+0000)
Subject: checking for HASH ref explicitly
X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=df8e4b63de92021c4c712e5e88a4ffee43768f3f;p=opensrf%2Fbjwebb.git

checking for HASH ref explicitly


git-svn-id: svn://svn.open-ils.org/OpenSRF/trunk@198 9efc2488-bf62-4759-914b-345cdb29e865
---

diff --git a/src/perlmods/OpenSRF/Utils/SettingsClient.pm b/src/perlmods/OpenSRF/Utils/SettingsClient.pm
index b7fed49..2568172 100755
--- a/src/perlmods/OpenSRF/Utils/SettingsClient.pm
+++ b/src/perlmods/OpenSRF/Utils/SettingsClient.pm
@@ -45,7 +45,7 @@ sub config_value {
 	# call out to settings server when necessary....
 	try {
 		for my $key (@keys) {
-			if(!defined($hash)){
+			if(!ref($hash) eq 'HASH'){
 				return undef;
 			}
 			$hash = $hash->{$key};