mirror of
https://github.com/xcat2/xcat-core.git
synced 2025-06-12 00:00:12 +00:00
fix for bug 3007510
git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@6266 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
@ -889,7 +889,7 @@ sub defmk
|
||||
} else {
|
||||
my $invalidnodename = ();
|
||||
foreach my $node (@::allobjnames) {
|
||||
if ($node =~ /[A-Z]/) {
|
||||
if (($node =~ /[A-Z]/) && ((!$::opt_t) || ($::opt_t eq "node"))) {
|
||||
$invalidnodename .= ",$node";
|
||||
}
|
||||
}
|
||||
@ -2101,7 +2101,7 @@ sub defch
|
||||
my $newobj = ();
|
||||
my $invalidnodename = ();
|
||||
foreach my $node (keys %newobjects) {
|
||||
if ($node =~ /[A-Z]/) {
|
||||
if (($node =~ /[A-Z]/) && ((!$::opt_t) || ($::opt_t eq "node"))) {
|
||||
$invalidnodename .= ",$node";
|
||||
}
|
||||
$newobj .= ",$node";
|
||||
|
Reference in New Issue
Block a user