remove FIXME
Using NoLiveUpdate here is appropriate, because this is running the server side of the P2P protocol. There no preferred content checking is done.
This commit is contained in:
parent
3f8675f339
commit
1d51f18dd0
1 changed files with 0 additions and 2 deletions
|
@ -121,7 +121,6 @@ runLocal runst runner a = case a of
|
||||||
Right (Left e) -> return $ Left e
|
Right (Left e) -> return $ Left e
|
||||||
Right (Right ok) -> runner (next ok)
|
Right (Right ok) -> runner (next ok)
|
||||||
SetPresent k u next -> do
|
SetPresent k u next -> do
|
||||||
-- FIXME: Can a live update be done here?
|
|
||||||
v <- tryNonAsync $ logChange NoLiveUpdate k u InfoPresent
|
v <- tryNonAsync $ logChange NoLiveUpdate k u InfoPresent
|
||||||
case v of
|
case v of
|
||||||
Left e -> return $ Left $ ProtoFailureException e
|
Left e -> return $ Left $ ProtoFailureException e
|
||||||
|
@ -133,7 +132,6 @@ runLocal runst runner a = case a of
|
||||||
Right result -> runner (next result)
|
Right result -> runner (next result)
|
||||||
RemoveContent k mts next -> do
|
RemoveContent k mts next -> do
|
||||||
let cleanup = do
|
let cleanup = do
|
||||||
-- FIXME: Can a live update be done here?
|
|
||||||
logStatus NoLiveUpdate k InfoMissing
|
logStatus NoLiveUpdate k InfoMissing
|
||||||
return True
|
return True
|
||||||
let checkts = case mts of
|
let checkts = case mts of
|
||||||
|
|
Loading…
Reference in a new issue