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/branches/2.7@13702 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
yinle 2012-09-03 07:38:14 +00:00
parent 94e3862219
commit a000d5f80b

View File

@ -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 );