From 55cbc5fa4be2ef93373d5d532353ca9dea8eb9a4 Mon Sep 17 00:00:00 2001
From: yinle <yinle@8638fb3e-16cb-4fca-ae20-7b5d299a9bcd>
Date: Mon, 3 Sep 2012 07:39:45 +0000
Subject: [PATCH] fix bug 3563351: lsslp -r flag provides error on ST NGP xCAT
 MN

git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@13703 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
---
 xCAT-server/lib/xcat/plugins/lsslp.pm | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/xCAT-server/lib/xcat/plugins/lsslp.pm b/xCAT-server/lib/xcat/plugins/lsslp.pm
index dbd493d9f..bc6b7be61 100644
--- a/xCAT-server/lib/xcat/plugins/lsslp.pm
+++ b/xCAT-server/lib/xcat/plugins/lsslp.pm
@@ -649,8 +649,10 @@ sub format_output {
             my $raw = ${$outhash->{$_}}{url};
             $rawhash{$raw} = 1;
         }
-        foreach ( keys %rawhash ) {
-            $result .= "$_\n";
+        foreach my $en ( keys %rawhash ) {
+            if ($en =~ /(\(type.*\))/) {
+                $result .= "$1\n";
+            }
         }
 
         send_msg( $request, 0, $result );