fix myxCATname

git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@8627 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd

perl-xCAT/xCAT/InstUtils.pm

@@ -151,6 +151,10 @@ sub myxCATname
         }
     }
 
+	if (!$name) {
+		$name = hostname();
+	}
+
     my $shorthost;
     ($shorthost = $name) =~ s/\..*$//;
     chomp $shorthost;

perl-xCAT/xCAT/Utils.pm

@@ -1037,7 +1037,6 @@ sub runcmd
 
 	# get this systems name as known by xCAT management node
 	my $Sname = xCAT::InstUtils->myxCATname();
-	chomp $Sname;
 
 	if ($::VERBOSE)
 	{