only re-enqueue in-review contributions on push

Author: mitchellwrosen

src/Share/Postgres/Contributions/Queries.hs

@@ -518,7 +518,7 @@ savePrecomputedNamespaceDiff (CodebaseEnv {codebaseOwner = leftCodebaseUser}, le
         ON CONFLICT DO NOTHING
       |]
 
--- | Get all contribution IDs for contributions which have a source or target branch in the
+-- | Get all in-review contribution IDs for contributions which have a source or target branch in the
 -- provided set.
 contributionsRelatedToBranches :: Set BranchId -> PG.Transaction e [ContributionId]
 contributionsRelatedToBranches branchIds = do
@@ -529,6 +529,8 @@ contributionsRelatedToBranches branchIds = do
       )
         SELECT contr.id FROM contributions contr
           WHERE
-            contr.source_branch IN (SELECT branch_id FROM related_branches)
-            OR contr.target_branch IN (SELECT branch_id FROM related_branches)
+            (contr.source_branch IN (SELECT branch_id FROM related_branches)
+              OR contr.target_branch IN (SELECT branch_id FROM related_branches)
+            )
+            AND contr.status = 'in_review'
       |]