diff --git a/src/Vervis/Migration.hs b/src/Vervis/Migration.hs index f87594a..b01c4cd 100644 --- a/src/Vervis/Migration.hs +++ b/src/Vervis/Migration.hs @@ -940,6 +940,12 @@ changes hLocal ctx = "OutboxItem" -- 125 , addUnique "Ticket" $ Unique "UniqueTicketAccept" ["accept"] + -- 126 + , unchecked $ lift $ do + tids <- selectKeysList [Ticket20190624Status !=. "TSClosed"] [] + updateWhere + [Ticket20190624Id <-. tids] + [Ticket20190624Closer =. Nothing] ] migrateDB