From 33f1f5e80dea627b18311d04df29b33ed7144c96 Mon Sep 17 00:00:00 2001 From: xq2005 Date: Fri, 30 Nov 2012 09:03:30 +0000 Subject: [PATCH] defined(%hash) is deprecated git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@14495 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd --- xCAT-server/lib/perl/xCAT/Template.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/xCAT-server/lib/perl/xCAT/Template.pm b/xCAT-server/lib/perl/xCAT/Template.pm index 108e1e55d..68c7a611e 100644 --- a/xCAT-server/lib/perl/xCAT/Template.pm +++ b/xCAT-server/lib/perl/xCAT/Template.pm @@ -514,7 +514,7 @@ sub tabdb my $blankok = shift; - if( defined(%::GLOBAL_TAB_HASH) && defined( $::GLOBAL_TAB_HASH{$table}) && defined( $::GLOBAL_TAB_HASH{$table}{$key}) ) { + if( %::GLOBAL_TAB_HASH && defined( $::GLOBAL_TAB_HASH{$table}) && defined( $::GLOBAL_TAB_HASH{$table}{$key}) ) { if( defined($::GLOBAL_TAB_HASH{$table}{$key}{$field}) ) { return $::GLOBAL_TAB_HASH{$table}{$key}{$field}; } else {