From 8138621b11b70e3a12c4d6f24e0b7ca1118e83db Mon Sep 17 00:00:00 2001 From: Griffin Smith Date: Fri, 17 Jul 2020 10:17:22 -0400 Subject: fix(owothia): Add " to stopword list how *this* got classified as a verb I will never understand. Change-Id: I1ae0c5092b0f4371fb191e19f576dac89fb941ab Reviewed-on: https://cl.tvl.fyi/c/depot/+/1250 Tested-by: BuildkiteCI Reviewed-by: isomer --- users/glittershark/owothia/src/Main.hs | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'users/glittershark/owothia') diff --git a/users/glittershark/owothia/src/Main.hs b/users/glittershark/owothia/src/Main.hs index 5e0f18a924c8..941c9adfc378 100644 --- a/users/glittershark/owothia/src/Main.hs +++ b/users/glittershark/owothia/src/Main.hs @@ -36,6 +36,7 @@ instance FromEnv Config where stopWord :: Text -> Bool stopWord "'s" = True +stopWord "\"" = True stopWord "is" = True stopWord "are" = True stopWord "am" = True @@ -103,7 +104,7 @@ main = do conf <- either fail pure =<< decodeEnv tagger <- defaultTagger state <- newIORef $ not . isJust $ (conf ^. nickservPassword) - let nick = fromMaybe "owothia" (conf ^. ircNick) + let nick = fromMaybe "owothia" (conf ^. ircNick) conn = plainConnection (conf ^. ircServer) (conf ^. ircPort) & realname .~ "Owothia Revströwö" -- cgit 1.4.1