From 161fcdbed6c6e1ba284f691c4da30a225e955691 Mon Sep 17 00:00:00 2001 From: koral Date: Fri, 26 Jun 2015 12:17:16 +0200 Subject: [PATCH] Remove unused dependency on aeson. --- hbro.cabal | 1 - library/Network/URI/Extended.hs | 9 --------- 2 files changed, 10 deletions(-) diff --git a/hbro.cabal b/hbro.cabal index 93d0908..b081f95 100644 --- a/hbro.cabal +++ b/hbro.cabal @@ -22,7 +22,6 @@ Source-repository head Library Build-depends: - aeson, base == 4.*, bytestring, classy-prelude >= 0.12, diff --git a/library/Network/URI/Extended.hs b/library/Network/URI/Extended.hs index 48f5fb1..70bf005 100644 --- a/library/Network/URI/Extended.hs +++ b/library/Network/URI/Extended.hs @@ -13,19 +13,10 @@ module Network.URI.Extended import Hbro.Error import Hbro.Prelude -import Data.Aeson - import Network.URI as X hiding (parseURI, parseURIReference) import qualified Network.URI as N -- }}} -instance FromJSON URI where - parseJSON (String t) = maybe mzero return $ parseURIReference t - parseJSON _ = mzero - -instance ToJSON URI where - toJSON = String . tshow - -- | Generalized version of 'N.parseURIReference'. parseURIReference :: (MonadThrow m) => Text -> m URI parseURIReference uri = N.parseURIReference (unpack uri) `failWith` InvalidUri uri