Describe doors as either closed or open
Rather than just describing them as "a door". Descriptions should ideally be as injective as possible!
This commit is contained in:
parent
5c5aa14a3d
commit
c4351d46ef
1 changed files with 2 additions and 1 deletions
|
@ -88,7 +88,8 @@ instance Brain Door where step = brainVia Brainless
|
||||||
|
|
||||||
instance Entity Door where
|
instance Entity Door where
|
||||||
blocksVision = not . view open
|
blocksVision = not . view open
|
||||||
description _ = "a door"
|
description door | door ^. open = "an open door"
|
||||||
|
| otherwise = "a closed door"
|
||||||
entityChar _ = "d"
|
entityChar _ = "d"
|
||||||
|
|
||||||
-- | A closed, unlocked door
|
-- | A closed, unlocked door
|
||||||
|
|
Loading…
Reference in a new issue