libvirt: Handle VIR_DOMAIN_PMSUSPENDED state.

[virt-top.git] / src / screen.ml

diff --git a/src/screen.ml b/src/screen.ml
index 0d847a2..8a66ba6 100644 (file)
--- a/src/screen.ml
+++ b/src/screen.ml
@@ -50,3 +50,4 @@ let show_state = function
   | D.InfoShutdown -> 'D'
   | D.InfoShutoff -> 'O'
   | D.InfoCrashed -> 'X'
+  | D.InfoPMSuspended -> 'M'