Module Libvirt.Event.Tray_change

module Tray_change: sig .. end

type reason = [ `Close | `Open | `Unknown of int ]

type t = {

	`dev_alias : string option;`	`(*`	device alias	`*)`
	`reason : reason;`	`(*`	why the tray status was changed	`*)`

}

val to_string : t -> string