on second thought, do allow deferring StartingPush

My reasoning is that StartingPush could be received after another push
starts being received, and it would be better to respond to it afterwards
than not.
This commit is contained in:
Joey Hess 2012-11-10 01:41:28 -04:00
parent 16b2472574
commit 2286032781

View file

@ -56,6 +56,7 @@ getClientID (ReceivePackDone cid _) = Just cid
isPushInitiationMessage :: NetMessage -> Bool isPushInitiationMessage :: NetMessage -> Bool
isPushInitiationMessage (CanPush _) = True isPushInitiationMessage (CanPush _) = True
isPushInitiationMessage (PushRequest _) = True isPushInitiationMessage (PushRequest _) = True
isPushInitiationMessage (StartingPush _) = True
isPushInitiationMessage _ = False isPushInitiationMessage _ = False
data NetMessager = NetMessager data NetMessager = NetMessager