From a69ec2f2c87ab64a556d3ebbb6ced251d651de76 Mon Sep 17 00:00:00 2001 From: sakolish Date: Wed, 19 Dec 2007 20:35:49 +0000 Subject: [PATCH] Changed getmacs output format - Line #304 git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@194 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd --- perl-xCAT-2.0/xCAT/PPCmac.pm | 6 +----- 1 file changed, 1 insertion(+), 5 deletions(-) diff --git a/perl-xCAT-2.0/xCAT/PPCmac.pm b/perl-xCAT-2.0/xCAT/PPCmac.pm index 10dab7c6e..5665bf16b 100644 --- a/perl-xCAT-2.0/xCAT/PPCmac.pm +++ b/perl-xCAT-2.0/xCAT/PPCmac.pm @@ -232,7 +232,6 @@ sub getmacs { my $exp = shift; my $opt = $request->{opt}; my $hwtype = @$exp[2]; - my @output; my $result; ######################################### @@ -303,11 +302,8 @@ sub getmacs { # and not with others. ##################################### my $values; - foreach ( @$result ) { - if ( /^#\s*Type|^ent/ ) { - $values.= "\n$_"; - } + $values.= "\n$_"; } return( [[$name,$values]] ); }