diff --git a/src/Vervis/Field/Ticket.hs b/src/Vervis/Field/Ticket.hs index 357451e..5358af5 100644 --- a/src/Vervis/Field/Ticket.hs +++ b/src/Vervis/Field/Ticket.hs @@ -70,5 +70,5 @@ selectTicketDep jid tid = checkDep tid $ checkNotSelf tid $ selectField $ - optionsPersistKey [TicketProject P.==. jid, TicketId P.!=. tid] [] $ + optionsPersistKey [TicketProject P.==. jid, TicketId P.!=. tid] [P.Asc TicketNumber] $ \ t -> sformat (int % " :: " % stext) (ticketNumber t) (ticketTitle t)