toMessage e (GameUpdate (RemovedMobFlag m Sleeping))    | isPlayer m = Just $ "You wake up."
toMessage e (GameUpdate (RemovedMobFlag m Sleeping))    | isPlayer m = Just $ "You wake up."
toMessage e (GameUpdate (RemovedMobFlag m Sleeping))    | isPlayer m = Just $ "You wake up."