From 9fe41916f5fed253052ae287b1ee29793057d50e Mon Sep 17 00:00:00 2001
From: ·𐑑𐑴𐑕𐑑𐑩𐑤
Date: Fri, 2 Jan 2026 07:51:48 +0000
Subject: QCheck: update naming

---
 lib/uRI.ml | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lib/uRI.ml b/lib/uRI.ml
index cdcf9f5..79cfaab 100644
--- a/lib/uRI.ml
+++ b/lib/uRI.ml
@@ -13,7 +13,7 @@ let jsont : t Jsont.t =
 let gen =
 	let open QCheck.Gen in
 	let a_to_z = (char_range 'a' 'z') in
-	let* scheme = QCheck.Gen.oneofl ["http"; "https"; "ftp"; "sftp"] in
+	let* scheme = QCheck.Gen.oneof_list ["http"; "https"; "ftp"; "sftp"] in
 	let* host = string_size ~gen: a_to_z (int_bound 20) in
 	let* tld = string_size ~gen: a_to_z (int_bound 5) in
 	let* path_opt = option (string_size ~gen: a_to_z (int_bound 10)) in
-- 
cgit v1.2.3