Git-Mirrors/qubes-mirage-firewall
1
0
Fork 0
mirror of https://github.com/mirage/qubes-mirage-firewall.git synced 2025-03-03 12:29:15 -05:00
Code Issues Packages Projects Releases Wiki Activity

remove delay as the fix should be in mirage-net-xen

Browse Source
This commit is contained in:
palainp 2023-07-12 16:10:33 +02:00
parent 6f6eab5cd5
commit 2d822302d8
1 changed files with 0 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
dispatcher.ml
View File

@ -487,7 +487,6 @@ struct
Log.info (fun f -> Log.info (fun f ->
f "disconnecting from our uplink"); f "disconnecting from our uplink");
Netif.disconnect uplink.net; Netif.disconnect uplink.net;
Time.sleep_ns (Duration.of_sec 1) >>= fun () ->
Lwt_condition.broadcast router.uplink_disconnected (); Lwt_condition.broadcast router.uplink_disconnected ();
Lwt.return_unit Lwt.return_unit
| e -> Lwt.fail e) | e -> Lwt.fail e)