aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJoris Guyonvarch2015-08-08 17:21:46 +0200
committerJoris Guyonvarch2015-08-08 17:21:46 +0200
commit04f9a66c66ca137d9fee6ccca228c41fec960fe0 (patch)
tree819815dc2bb2a9294531968d38eadd834fcea23e
parent5709f552ddb71c082db9a202f76215cdd3a6a3ec (diff)
Removing unused code
-rw-r--r--src/Config.hs4
1 files changed, 0 insertions, 4 deletions
diff --git a/src/Config.hs b/src/Config.hs
index 39ff185..0a80183 100644
--- a/src/Config.hs
+++ b/src/Config.hs
@@ -85,10 +85,6 @@ configFromMap map = do
}
return config
-eitherToMaybe :: Either a b -> Maybe b
-eitherToMaybe (Right x) = Just x
-eitherToMaybe _ = Nothing
-
fieldValues :: Text -> Map Text Text -> [Text]
fieldValues field map = fromMaybe [] $ fmap T.strip . T.splitOn "," <$> M.lookup field map