From 0ae4fa52e64be5707a76acf94644fd5870a9ce1c Mon Sep 17 00:00:00 2001
From: Mark Elvers <mark.elvers@tunbury.org>
Date: Tue, 1 Oct 2024 19:27:35 +0000
Subject: [PATCH] Ignore unmount status

---
 lib/sandbox.macos.ml | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/lib/sandbox.macos.ml b/lib/sandbox.macos.ml
index 8e568ebc..ecdc0db2 100644
--- a/lib/sandbox.macos.ml
+++ b/lib/sandbox.macos.ml
@@ -110,7 +110,8 @@ let create ~state_dir:_ c =
   }
 
 let finished () =
-  Os.sudo [ "zfs"; "unmount"; "obuilder/result" ] >>= fun () ->
+  let pp s ppf = Fmt.pf ppf "[ zfs ] %s\n" s in
+  Os.sudo_result ~pp:(pp "unmount") [ "zfs"; "unmount"; "obuilder/result" ] >>= fun _ ->
   Os.sudo [ "zfs"; "mount"; "obuilder/result" ] >>= fun () ->
   Lwt.return ()