5
0
mirror of git://git.proxmox.com/git/qemu-server.git synced 2025-01-11 05:17:57 +03:00

implement vm_human_monitor_command using qmp

This commit is contained in:
Dietmar Maurer 2012-07-13 07:30:13 +02:00
parent 26f11676c7
commit 9df5cbcc70
2 changed files with 14 additions and 1 deletions

View File

@ -2819,6 +2819,19 @@ sub vm_qmp_command {
return $res;
}
sub vm_human_monitor_command {
my ($vmid, $cmdline) = @_;
my $res;
my $cmd = {
execute => 'human-monitor-command',
arguments => { 'command-line' => $cmdline},
};
return vm_qmp_command($vmid, $cmd);
}
sub vm_commandline {
my ($storecfg, $vmid) = @_;

2
qm
View File

@ -294,7 +294,7 @@ __PACKAGE__->register_method ({
last if $input =~ m/^\s*q(uit)?\s*$/;
eval {
print PVE::QemuServer::vm_monitor_command ($vmid, $input);
print PVE::QemuServer::vm_human_monitor_command ($vmid, $input);
};
print "ERROR: $@" if $@;
}