unintegrateAfter: document noop

channable · Aug 17, 2022 · 75d9176 · 75d9176
1 parent a699fd2
commit 75d9176
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/Logic.hs b/src/Logic.hs
@@ -561,7 +561,7 @@ handleMergeRequested projectConfig prId author state pr approvalType = do
 --   in the merge train as NotIntegrated
 unintegrateAfter :: PullRequestId -> ProjectState -> ProjectState
 unintegrateAfter pid state = case Pr.lookupPullRequest pid state of
-  Nothing -> state -- should not happen
+  Nothing -> state -- PR not found.  Keep the state as it is.
   Just pr -> unintegrateAfter' pr state
   where
   unintegrateAfter' :: PullRequest -> ProjectState -> ProjectState