diff options
| author | Joris Guyonvarch | 2015-08-08 17:21:46 +0200 |
|---|---|---|
| committer | Joris Guyonvarch | 2015-08-08 17:21:46 +0200 |
| commit | 04f9a66c66ca137d9fee6ccca228c41fec960fe0 (patch) | |
| tree | 819815dc2bb2a9294531968d38eadd834fcea23e /src | |
| parent | 5709f552ddb71c082db9a202f76215cdd3a6a3ec (diff) | |
| download | ad-listener-04f9a66c66ca137d9fee6ccca228c41fec960fe0.tar.gz ad-listener-04f9a66c66ca137d9fee6ccca228c41fec960fe0.tar.bz2 ad-listener-04f9a66c66ca137d9fee6ccca228c41fec960fe0.zip | |
Removing unused code
Diffstat (limited to 'src')
| -rw-r--r-- | src/Config.hs | 4 |
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 |