diff --git a/Assistant/Types/NetMessager.hs b/Assistant/Types/NetMessager.hs index cd96a5523e..d2195f53c3 100644 --- a/Assistant/Types/NetMessager.hs +++ b/Assistant/Types/NetMessager.hs @@ -56,6 +56,7 @@ getClientID (ReceivePackDone cid _) = Just cid isPushInitiationMessage :: NetMessage -> Bool isPushInitiationMessage (CanPush _) = True isPushInitiationMessage (PushRequest _) = True +isPushInitiationMessage (StartingPush _) = True isPushInitiationMessage _ = False data NetMessager = NetMessager