[libvirt-perl][PATCH 2/2] Add VIR_DOMAIN_EVENT_ID_DEVICE_REMOVAL_FAILED constant

[Ján Tomko <jtomko@xxxxxxxxxx>]

Point it to _domain_event_device_generic_callback.
---
 Changes                | 1 +
 Virt.xs                | 4 ++++
 lib/Sys/Virt/Domain.pm | 4 ++++
 t/030-api-coverage.t   | 1 +
 4 files changed, 10 insertions(+)

diff --git a/Changes b/Changes
index 3a73bc8..a54cf71 100644
--- a/Changes
+++ b/Changes
@@ -2,6 +2,7 @@ Revision history for perl module Sys::Virt
 
 1.3.4 2016-00-00
 
+ - Add VIR_DOMAIN_EVENT_ID_DEVICE_REMOVAL_FAILED constant
  - Reuse VIR_DOMAIN_EVENT_ID_DEVICE callbacks
 
 1.3.3 2016-04-07
diff --git a/Virt.xs b/Virt.xs
index 6da8f64..85448c2 100644
--- a/Virt.xs
+++ b/Virt.xs
@@ -3077,6 +3077,9 @@ PREINIT:
       case VIR_DOMAIN_EVENT_ID_JOB_COMPLETED:
           callback = VIR_DOMAIN_EVENT_CALLBACK(_domain_event_job_completed_callback);
           break;
+      case VIR_DOMAIN_EVENT_ID_DEVICE_REMOVAL_FAILED:
+          callback = VIR_DOMAIN_EVENT_CALLBACK(_domain_event_device_generic_callback);
+          break;
       default:
           callback = VIR_DOMAIN_EVENT_CALLBACK(_domain_event_generic_callback);
           break;
@@ -7814,6 +7817,7 @@ BOOT:
       REGISTER_CONSTANT(VIR_DOMAIN_EVENT_ID_AGENT_LIFECYCLE, EVENT_ID_AGENT_LIFECYCLE);
       REGISTER_CONSTANT(VIR_DOMAIN_EVENT_ID_MIGRATION_ITERATION, EVENT_ID_MIGRATION_ITERATION);
       REGISTER_CONSTANT(VIR_DOMAIN_EVENT_ID_JOB_COMPLETED, EVENT_ID_JOB_COMPLETED);
+      REGISTER_CONSTANT(VIR_DOMAIN_EVENT_ID_DEVICE_REMOVAL_FAILED, EVENT_ID_DEVICE_REMOVAL_FAILED);
 
       REGISTER_CONSTANT(VIR_DOMAIN_EVENT_WATCHDOG_NONE, EVENT_WATCHDOG_NONE);
       REGISTER_CONSTANT(VIR_DOMAIN_EVENT_WATCHDOG_PAUSE, EVENT_WATCHDOG_PAUSE);
diff --git a/lib/Sys/Virt/Domain.pm b/lib/Sys/Virt/Domain.pm
index b095dbd..bafe9ba 100644
--- a/lib/Sys/Virt/Domain.pm
+++ b/lib/Sys/Virt/Domain.pm
@@ -3012,6 +3012,10 @@ method.
 
 =back
 
+=item Sys::Virt::Domain::EVENT_ID_DEVICE_REMOVAL_FAILED
+
+Guest device removal has failed.
+
 =head2 IO ERROR EVENT CONSTANTS
 
 These constants describe what action was taken due to the
diff --git a/t/030-api-coverage.t b/t/030-api-coverage.t
index d0c856a..17c1b3f 100644
--- a/t/030-api-coverage.t
+++ b/t/030-api-coverage.t
@@ -93,6 +93,7 @@ virConnectDomainEventTunableCallback
 virConnectDomainEventAgentLifecycleCallback
 virConnectDomainEventMigrationIterationCallback
 virConnectDomainEventJobCompletedCallback
+virConnectDomainEventDeviceRemovalFailedCallback
 
 virConnectNetworkEventLifecycleCallback
 
-- 
2.7.3

--
libvir-list mailing list
libvir-list@xxxxxxxxxx
https://www.redhat.com/mailman/listinfo/libvir-list