In getTicketR, if author is local, make sure a TicketUnderProject exists

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
                     )