From 80785946c3f5ea64dd34fc1c13aa72ae30b19028 Mon Sep 17 00:00:00 2001 From: lissav Date: Tue, 20 Aug 2013 09:55:49 -0400 Subject: [PATCH] fix for defect 3750 --- perl-xCAT/xCAT/Utils.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/perl-xCAT/xCAT/Utils.pm b/perl-xCAT/xCAT/Utils.pm index ca3b4b87d..10cd155f9 100644 --- a/perl-xCAT/xCAT/Utils.pm +++ b/perl-xCAT/xCAT/Utils.pm @@ -4049,7 +4049,7 @@ sub getSNList $servicenodetab->close; foreach my $node (@nodes) { - if ($service eq "") # want all the service nodes + if (! defined ($service) || ($service eq "")) # want all the service nodes { push @servicenodes, $node->{node}; }