Job.get does not return an option

This commit is contained in:
Reynir Björnsson 2021-03-23 11:53:41 +01:00
parent 5cdcbdff74
commit 643b156e07
2 changed files with 2 additions and 2 deletions

View file

@ -60,7 +60,7 @@ module Job = struct
{| DROP TABLE IF EXISTS job |} {| DROP TABLE IF EXISTS job |}
let get = let get =
Caqti_request.find_opt Caqti_request.find
id id
Caqti_type.string Caqti_type.string
"SELECT name FROM job WHERE id = ?" "SELECT name FROM job WHERE id = ?"

View file

@ -51,7 +51,7 @@ module Job : sig
(unit, unit, [< `Many | `One | `Zero > `Zero ]) Caqti_request.t (unit, unit, [< `Many | `One | `Zero > `Zero ]) Caqti_request.t
val get : val get :
(id, string, [< `Many | `One | `Zero > `One `Zero ]) (id, string, [< `Many | `One | `Zero > `One ])
Caqti_request.t Caqti_request.t
val get_id_by_name : val get_id_by_name :
(string, id, [< `Many | `One | `Zero > `One ]) Caqti_request.t (string, id, [< `Many | `One | `Zero > `One ]) Caqti_request.t