Hannah now tolerates LogIn and LogOut messages (but doesn't care about them)

This commit is contained in:
Tissevert 2019-12-24 00:37:50 +01:00
parent a9ba5cc47c
commit f77871b538

View file

@ -86,6 +86,8 @@ answer state (Error {error}) = do
- Ignore - Ignore
-} -}
answer state@(Connected {}) (Okaeri {}) = return state answer state@(Connected {}) (Okaeri {}) = return state
answer state (LogIn {}) = return state
answer state (LogOut {}) = return state
answer state (Relay {}) = return state answer state (Relay {}) = return state
answer state message = do answer state message = do