defect 2950595,2944713: display lsdef -t site obj with long format; add node for chdef when node does not exist
git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@5318 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
parent
063abca243
commit
20834bc61f
@ -296,6 +296,7 @@ sub processArgs
|
||||
|
||||
# if we know the type isn't "node" then set the object list
|
||||
@::clobjnames = split(',', $a);
|
||||
@::noderange = @::clobjnames;
|
||||
$::objectsfrom_args = 1;
|
||||
}
|
||||
elsif (!$::opt_t || ($::opt_t eq 'node'))
|
||||
@ -1583,6 +1584,9 @@ sub defch
|
||||
if (!$isDefined)
|
||||
{
|
||||
$newobjects{$obj} = $type;
|
||||
if (! grep (/^groups$/, keys %{$::FINALATTRS{$obj}}) ) {
|
||||
$::FINALATTRS{$obj}{'groups'} = "all";
|
||||
}
|
||||
}
|
||||
|
||||
if (!$isDefined && $::opt_m)
|
||||
@ -2040,7 +2044,7 @@ sub defch
|
||||
# xCAT::MsgUtils->message("E", $rsp, $::callback);
|
||||
$error = 1;
|
||||
}
|
||||
|
||||
|
||||
if ($error)
|
||||
{
|
||||
my $rsp;
|
||||
|
Loading…
Reference in New Issue
Block a user