diff options
Diffstat (limited to 'lib/query.ml')
-rw-r--r-- | lib/query.ml | 7 |
1 files changed, 2 insertions, 5 deletions
diff --git a/lib/query.ml b/lib/query.ml index 2dab927..40a2c22 100644 --- a/lib/query.ml +++ b/lib/query.ml @@ -1,5 +1,3 @@ -type pool = ((module Rapper_helper.CONNECTION), Caqti_error.t) Caqti_eio.Pool.t - module Q = struct let transaction = [%rapper @@ -27,7 +25,7 @@ module Q = struct ;; let client = - let open Client in + let open Operation in [%rapper get_opt {sql| @@ -61,8 +59,7 @@ module Q = struct let lock = [%rapper - execute - {sql| + execute {sql| SELECT pg_advisory_xact_lock(%int{client_id}) |sql}] ;; |