From 04f9a66c66ca137d9fee6ccca228c41fec960fe0 Mon Sep 17 00:00:00 2001
From: Joris Guyonvarch
Date: Sat, 8 Aug 2015 17:21:46 +0200
Subject: Removing unused code

---
 src/Config.hs | 4 ----
 1 file changed, 4 deletions(-)

(limited to 'src')

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
 
-- 
cgit v1.2.3