diff --git a/src/Hanafuda/Message.hs b/src/Hanafuda/Message.hs
index aa529bc..6d1f7c2 100644
--- a/src/Hanafuda/Message.hs
+++ b/src/Hanafuda/Message.hs
@@ -197,6 +197,7 @@ data T =
     Relay {from :: PlayerID, message :: FromClient}
   | Welcome {room :: Room, key :: PlayerID}
   | Okaeri {room :: Room}
+  | LogIn {from :: PlayerID, as :: Text}
   | Game {state :: PublicGame, logs :: [KoiKoi.Action]}
   | Pong
   | Error {error :: String}