debian/patches/modify-query-machines.patch

   1 Index: new/qapi-schema.json
   2 ===================================================================
   3 --- new.orig/qapi-schema.json   2013-05-29 06:32:28.000000000 +0200
   4 +++ new/qapi-schema.json        2013-05-29 06:35:27.000000000 +0200
   5 @@ -2947,11 +2947,13 @@
   6  #
   7  # @default: #optional whether the machine is default
   8  #
   9 +# @current: #optional whether this machine is currently used
  10 +#
  11  # Since: 1.2.0
  12  ##
  13  { 'type': 'MachineInfo',
  14    'data': { 'name': 'str', '*alias': 'str',
  15 -            '*is-default': 'bool' } }
  16 +            '*is-default': 'bool', '*is-current': 'bool', } }
  17
  18  ##
  19  # @query-machines:
  20 Index: new/vl.c
  21 ===================================================================
  22 --- new.orig/vl.c       2013-05-29 06:32:28.000000000 +0200
  23 +++ new/vl.c    2013-05-29 06:39:13.000000000 +0200
  24 @@ -1579,6 +1579,11 @@
  25
  26          info->name = g_strdup(m->name);
  27
  28 +        if (strcmp(m->name, current_machine->name) == 0) {
  29 +            info->has_is_current = true;
  30 +            info->is_current = true;
  31 +        }
  32 +
  33          entry = g_malloc0(sizeof(*entry));
  34          entry->value = info;
  35          entry->next = mach_list;