From 98aa5626fd776b4d91d678dc825c46ff169d1bb8 Mon Sep 17 00:00:00 2001
From: jbjohnso <jbjohnso@8638fb3e-16cb-4fca-ae20-7b5d299a9bcd>
Date: Thu, 11 Sep 2008 01:57:01 +0000
Subject: [PATCH] Correct the scope of ''

git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@2139 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
---
 perl-xCAT/xCAT/Table.pm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/perl-xCAT/xCAT/Table.pm b/perl-xCAT/xCAT/Table.pm
index 52ab7f7ea..0ad595f19 100644
--- a/perl-xCAT/xCAT/Table.pm
+++ b/perl-xCAT/xCAT/Table.pm
@@ -1725,6 +1725,7 @@ sub getAttribs
             {    #To undef fields in rows that may still be returned
 
 	      my $wrkstr = $data->{$attrib};
+         my $out;
 	      while ($wrkstr =~ /(\{.*?\})/g) {
 		#-- this have to be thoroughly tested...
 		#-- special constructions in tables
@@ -1736,7 +1737,7 @@ sub getAttribs
 		 $exp =~ /^{hostname}$/ && do { $out = qx/hostname/; chomp $out; $expfound = 1; };
 		 $exp =~ /^{xcatmaster}$/ && do {
 		   my $ostab = xCAT::Table->new('site');
-		   my $out = $ostab->getAttribs({key=>"master"},'value');
+		   $out = $ostab->getAttribs({key=>"master"},'value');
 		   if ($out and $out->{value}) {
 		     $out = $out->{'value'}; $expfound = 1;
 		   }