fix emgr support
git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/branches/2.6@11583 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
@@ -1617,16 +1617,9 @@ sub doAIXcopy
|
||||
foreach my $pkg (@$list)
|
||||
{
|
||||
chomp $pkg;
|
||||
my ($junk, $pname);
|
||||
if (($pkg =~ /^R:/) || ($pkg =~ /^I:/) || ($pkg =~ /^E:/) )
|
||||
if (!grep(/^$pkg$/, @pkglist))
|
||||
{
|
||||
($junk, $pname) = split(/:/, $pkg);
|
||||
} else {
|
||||
$pname = $pkg;
|
||||
}
|
||||
if (!grep(/^$pname$/, @pkglist))
|
||||
{
|
||||
push(@pkglist, $pname);
|
||||
push(@pkglist, $pkg);
|
||||
}
|
||||
}
|
||||
$bndloc{$bnd} = $loc;
|
||||
@@ -1904,7 +1897,7 @@ sub updateAIXsoftware
|
||||
} else {
|
||||
$pname = $p;
|
||||
}
|
||||
push @emgr_pkgs, $p;
|
||||
push @emgr_pkgs, $pname;
|
||||
|
||||
} else {
|
||||
my ($junk, $pname);
|
||||
|
||||
Reference in New Issue
Block a user