Replaced use of StringLabels

daypack-dev · Dec 8, 2023 · 61031fb · 61031fb
1 parent 99db185
commit 61031fb
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 2 deletions.
diff --git a/timedesc/RFC9110_parsers.ml b/timedesc/RFC9110_parsers.ml
@@ -20,7 +20,7 @@ let month_p : int Angstrom.t =
   if String.length s < 3 then
     fail (Printf.sprintf "Invalid month: %s" s)
   else (
-    (match String.lowercase_ascii @@ StringLabels.sub ~pos:0 ~len:3 s with
+    (match String.lowercase_ascii @@ String.sub s 0 3 with
      | "jan" -> return 1
      | "feb" -> return 2
      | "mar" -> return 3

diff --git a/timedesc/timedesc.mli b/timedesc/timedesc.mli
@@ -2192,7 +2192,7 @@ module Utils : sig
 
       You are advised to read the source code of the following functions in [date_time_utils.ml] if you intend to use them
                                                                                to ensure they behave as you expect.
-                                                                            *)
+  *)
 
   val is_leap_year : year:int -> bool