diff options
Diffstat (limited to 'users/glittershark/owothia')
| -rw-r--r-- | users/glittershark/owothia/src/Main.hs | 3 |
1 files changed, 2 insertions, 1 deletions
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ö" |