-Also implement mkvm for kvm plugin

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

xCAT-server/lib/xcat/plugins/kvm.pm

@@ -53,6 +53,7 @@ sub handled_commands {
   #}
   return {
     rpower => 'nodehm:power,mgt',
+    mkvm => 'nodehm:power,mgt',
     rmigrate => 'nodehm:mgt',
     getnencons => 'nodehm:mgt',
     #rvitals => 'nodehm:mgt',
@@ -473,6 +474,9 @@ sub makedom {
 }
 
 
+sub mkvm {
+ build_xmldesc($node);
+}
 sub power {
     my $subcommand = shift;
     my $retstring;
@@ -533,6 +537,8 @@ sub guestcmd {
   my $error;
   if ($command eq "rpower") {
     return power(@args);
+  } elsif ($command eq "mkvm") {
+      return mkvm();
   } elsif ($command eq "rmigrate") {
       return migrate($node,@args);
   } elsif ($command eq "getrvidparms") {

xCAT-server/lib/xcat/plugins/xen.pm

@@ -921,7 +921,7 @@ sub dohyp {
   unless ($hypconn) {
      my %err=(node=>[]);
      foreach (keys %{$hyphash{$hyp}->{nodes}}) {
-        push (@{$err{node}},{name=>[$_],error=>["Cannot communicate AB via libvirt to $hyp"],errorcode=>[1]});
+        push (@{$err{node}},{name=>[$_],error=>["Cannot communicate via libvirt to $hyp"],errorcode=>[1]});
      }
      print $out freeze([\%err]);
      print $out "\nENDOFFREEZE6sK4ci\n";