From 6fa404ae05d65e6dbd1f29361c76569e19e463ed Mon Sep 17 00:00:00 2001
From: Clombrong <cromblong@egregore.fun>
Date: Sun, 29 Jun 2025 05:13:18 +0200
Subject: test(hello): handle MalformedStanza exceptions

---
 test/hello.ml | 1 +
 1 file changed, 1 insertion(+)

(limited to 'test')

diff --git a/test/hello.ml b/test/hello.ml
index ef24804..df5d865 100644
--- a/test/hello.ml
+++ b/test/hello.ml
@@ -17,6 +17,7 @@ let main =
          print_endline
            (match exn with
             | Xml.InvalidStanza stanza -> "Invalid stanza: " ^ stanza
+            | Portal.MalformedStanza err -> "Server sent malformed stanza: " ^ (Markup.Error.to_string err)
             | _ -> "... and so I stumble back to bed.");
          Lwt.fail exn
        end
-- 
cgit v1.2.3