diff --git a/src/Vervis/Federation/Offer.hs b/src/Vervis/Federation/Offer.hs
index e9051c0..bdde95b 100644
--- a/src/Vervis/Federation/Offer.hs
+++ b/src/Vervis/Federation/Offer.hs
@@ -552,6 +552,8 @@ deleteResolve myWorkItem prepareAccept tr = do
         Just wiData -> do
             bitraverse delete delete trxid
             delete trid
+            tid <- localTicketTicket <$> getJust ltid
+            update tid [TicketStatus =. TSTodo]
             (colls, accept) <- prepareAccept wiData
             return ("Ticket unresolved", Just colls, Just accept)