diff --git a/Remote/Compute.hs b/Remote/Compute.hs index 3adec4bc5b..7ed6040ceb 100644 --- a/Remote/Compute.hs +++ b/Remote/Compute.hs @@ -756,9 +756,7 @@ avoidCycles outputkeys inputkey = filterM go checkKey :: RemoteStateHandle -> Key -> Annex Bool checkKey rs k = do states <- getComputeStatesUnsorted rs k - if null states - then giveup "Missing compute state" - else return True + return (not (null states)) -- Unsetting the compute state will prevent computing the key. dropKey :: RemoteStateHandle -> Maybe SafeDropProof -> Key -> Annex ()