fixup! iteration limit for QueryID lookups

2020-07-05 18:18:51 +02:00 · 2020-07-05 18:18:51 +02:00 · df7423ce2e
parent e91f317a8e
commit df7423ce2e
1 changed files with 2 additions and 2 deletions
--- a/src/Hash2Pub/FediChord.hs
+++ b/src/Hash2Pub/FediChord.hs
@ -187,7 +187,7 @@ joinOnNewEntriesThread nsSTM = loop
            case queryLocalCache nsSnap cache 1 (getNid nsSnap) of
              -- empty cache, block until cache changes and then retry
              (FORWARD s) | Set.null s -> retry
-              result -> pure (result, cache)
+              result                   -> pure (result, cache)
        case lookupResult of
          -- already joined
          FOUND _ -> do