diff options
| author | Clombrong <cromblong@egregore.fun> | 2025-06-29 05:13:18 +0200 |
|---|---|---|
| committer | Clombrong <cromblong@egregore.fun> | 2025-06-29 05:13:52 +0200 |
| commit | 6fa404ae05d65e6dbd1f29361c76569e19e463ed (patch) | |
| tree | b5b106ecb73bf75bce71440bea80ef84bcf3d778 /test | |
| parent | 7fb5351f1a92746eb9d35e73f212400963cf2424 (diff) | |
test(hello): handle MalformedStanza exceptions
Diffstat (limited to 'test')
| -rw-r--r-- | test/hello.ml | 1 |
1 files changed, 1 insertions, 0 deletions
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 |