From 89f2c54973d94dc501222e86ad55d7c4a202f375 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Reynir=20Bj=C3=B6rnsson?= Date: Mon, 18 Sep 2023 14:09:54 +0200 Subject: [PATCH] Fix migrate-2023-09-11 by dropping hte index first --- bin/migrations/m20230911.ml | 6 ++++++ 1 file changed, 6 insertions(+) diff --git a/bin/migrations/m20230911.ml b/bin/migrations/m20230911.ml index ec36977..fe2d443 100644 --- a/bin/migrations/m20230911.ml +++ b/bin/migrations/m20230911.ml @@ -5,8 +5,13 @@ and rollback_doc = "index failed builds on exit code" open Grej.Syntax +let drop_idx_build_failed = + Caqti_type.(unit ->. unit) @@ + "DROP INDEX idx_build_failed" + let migrate _datadir (module Db : Caqti_blocking.CONNECTION) = let* () = Grej.check_version ~user_version:old_version (module Db) in + let* () = Db.exec drop_idx_build_failed () in let* () = Db.exec (Caqti_type.unit ->. Caqti_type.unit @@ "CREATE INDEX idx_build_failed ON build(job, start_d DESC, start_ps DESC) \ @@ -17,6 +22,7 @@ let migrate _datadir (module Db : Caqti_blocking.CONNECTION) = let rollback _datadir (module Db : Caqti_blocking.CONNECTION) = let* () = Grej.check_version ~user_version:new_version (module Db) in + let* () = Db.exec drop_idx_build_failed () in let* () = Db.exec (Caqti_type.unit ->. Caqti_type.unit @@ "CREATE INDEX idx_build_failed ON build(job, start_d DESC, start_ps DESC) \