diff --git a/.gitignore b/.gitignore index 5f489bec0..cb823d18a 100644 --- a/.gitignore +++ b/.gitignore @@ -1,8 +1,3 @@ *.swp -_build/ -setup.data -setup.log -setup.bin -networkd.native -networkd_db.native +dist/ diff --git a/networkd/network_monitor_thread.ml b/networkd/network_monitor_thread.ml index 6dce26dd3..17ec7693c 100644 --- a/networkd/network_monitor_thread.ml +++ b/networkd/network_monitor_thread.ml @@ -41,7 +41,7 @@ let send_bond_change_alert dev interfaces message = let obj_uuid = Inventory.lookup Inventory._installation_uuid in let body = Printf.sprintf "The status of the %s bond %s" ifaces message in try - let (name, priority) = ("bond_status_changed",3L) (* Api_messages.bond_status_changed *) in + let (name, priority) = Api_messages.bond_status_changed in let (_ : API.ref_message) = XenAPI.Message.create ~rpc:xapi_rpc ~session_id ~name ~priority ~cls:`Host ~obj_uuid ~body in () with _ ->