fix(jid): uchars_of_string starts parsing string to 0 now...

1 files changed, 1 insertions, 1 deletions

diff --git a/lib/jid.ml b/lib/jid.ml
index f6c691a..ab2e0e5 100644
--- a/lib/jid.ml
+++ b/lib/jid.ml
@@ -22,7 +22,7 @@ let uchars_of_string s : uchars =
         let k = utf_decode_length c in
         let u = utf_decode_uchar c in
         loop (u :: acc) (i + k)
-  in loop [] (String.length s)
+  in loop [] 0
 
 let string_of_uchars (u : uchars) =
   let buf = Buffer.create (4 * List.length u) in