diff --git a/src/Vervis/Handler/Ticket.hs b/src/Vervis/Handler/Ticket.hs index aa12c4c..ad85d29 100644 --- a/src/Vervis/Handler/Ticket.hs +++ b/src/Vervis/Handler/Ticket.hs @@ -222,9 +222,10 @@ postTicketCloseR shr prj num = do then return False else do update tid - [ TicketDone =. True - , TicketClosed =. now - , TicketCloser =. pid + [ TicketAssignee =. Nothing + , TicketDone =. True + , TicketClosed =. now + , TicketCloser =. pid ] return True setMessage $