toMessage e (GameUpdate (StairsTaken Down _)) = Just $ "You've gone down stairs."
toMessage e (GameUpdate (StairsTaken Down _)) = Just $ "You've gone down stairs."
toMessage e (GameUpdate (StairsTaken Down _)) = Just $ "You've gone down stairs."