From 1d9b8388e010b704a2d1fd67f3728bc75bf9b8ad Mon Sep 17 00:00:00 2001
From: jbjohnso <jbjohnso@8638fb3e-16cb-4fca-ae20-7b5d299a9bcd>
Date: Fri, 5 Mar 2010 22:58:11 +0000
Subject: [PATCH] -Avoid confusing perl in rmblade about '@' character in
 noderange

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

diff --git a/xCAT-server/share/xcat/tools/rmblade b/xCAT-server/share/xcat/tools/rmblade
index 8e3ce310c..b450287e4 100755
--- a/xCAT-server/share/xcat/tools/rmblade
+++ b/xCAT-server/share/xcat/tools/rmblade
@@ -77,7 +77,8 @@ print "ip: $ip\n";
 print "host: $mm\n";
 print "slot: $slot\n";
 # we now have slot and amm.  Need to now get which blade this is:
-my $node = `nodels mp.id==$slot@mp.mpa==$mm`;
+my $nlscmd = "nodels mp.id==$slot".'@'."mp.mpa==$mm"
+my $node = `$nlscmd`;
 chomp($node);
 print "node: $node\n";
 if($node ne ''){