Permalink
Browse files

grammar fix: replacing "a" by "the" takes into account "an"

  • Loading branch information...
Mikolaj committed May 28, 2011
1 parent bd2ab29 commit 9c28d068d0a0d1886b69a351b789248e04f4ae77
Showing with 2 additions and 1 deletion.
  1. +2 −1 src/EffectAction.hs
View
@@ -150,7 +150,8 @@ discover :: Item -> Action ()
discover i = do
state <- get
let ik = ikind i
- msg = "The" ++ L.tail (objectItem state i) ++ " turns out to be "
+ obj = unwords $ tail $ words $ objectItem state i
+ msg = "The " ++ obj ++ " turns out to be "
kind = ItemKind.getIK ik
alreadyIdentified = L.length (ItemKind.jflavour kind) == 1 ||
ik `S.member` sdiscoveries state

0 comments on commit 9c28d06

Please sign in to comment.