example/h-sql: tup2 is deprecated (#370)

aantron · Dec 17, 2024 · 204a792 · 204a792
1 parent da94944
commit 204a792
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/example/h-sql/README.md b/example/h-sql/README.md
@@ -14,7 +14,7 @@ module T = Caqti_type
 let list_comments =
   let query =
     let open Caqti_request.Infix in
-    (T.unit ->* T.(tup2 int string))
+    (T.unit ->* T.(t2 int string))
     "SELECT id, text FROM comment" in
   fun (module Db : DB) ->
     let%lwt comments_or_error = Db.collect_list query () in