diff --git a/src/Vervis/Handler/Ticket.hs b/src/Vervis/Handler/Ticket.hs index d3f26f0..5fca42c 100644 --- a/src/Vervis/Handler/Ticket.hs +++ b/src/Vervis/Handler/Ticket.hs @@ -270,6 +270,7 @@ getTicketR shar proj ltkhid = do requireEitherAlt (do mtal <- getValBy $ UniqueTicketAuthorLocal ltid for mtal $ \ tal -> do + _ <- getBy404 $ UniqueTicketUnderProjectProject tplid p <- getJust $ ticketAuthorLocalAuthor tal getJust $ personIdent p )