Using debined subroutine on hash object imports warning message

git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/branches/2.8@15993 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
2013-04-17 06:39:56 +00:00
parent 574b11fc1b
commit 3c0eea3f26
1 changed files with 1 additions and 1 deletions
--- a/xCAT-server/lib/perl/xCAT/Template.pm
+++ b/xCAT-server/lib/perl/xCAT/Template.pm
@@ -796,7 +796,7 @@ sub tabdb
   my $blankok = shift;
   

-   if( defined( %::GLOBAL_TAB_HASH) && defined( $::GLOBAL_TAB_HASH{$table} ) ) {
+   if( %::GLOBAL_TAB_HASH && defined( $::GLOBAL_TAB_HASH{$table} ) ) {
        if( !defined( $::GLOBAL_TAB_HASH{$table}{$key}) ) {
            return "''";   
        }