From d884224d1e8c652c6ec32bd57dbf37108425dc17 Mon Sep 17 00:00:00 2001 From: Sarah Vaupel Date: Thu, 20 Jun 2019 13:52:04 +0200 Subject: [PATCH] Removed unused DisplayAble instances for CI and Esqueleto.Value --- src/Utils.hs | 9 --------- 1 file changed, 9 deletions(-) diff --git a/src/Utils.hs b/src/Utils.hs index 55124298b..8f5f6c901 100644 --- a/src/Utils.hs +++ b/src/Utils.hs @@ -47,9 +47,6 @@ import Control.Monad.Except (MonadError(..)) import Control.Monad.Trans.Maybe as Utils (MaybeT(..)) import Control.Monad.Catch hiding (throwM) - -import qualified Database.Esqueleto as E (Value, unValue) - import Language.Haskell.TH import Language.Haskell.TH.Instances () import Instances.TH.Lift () @@ -268,12 +265,6 @@ instance DisplayAble a => DisplayAble (Maybe a) where display Nothing = "" display (Just x) = display x -instance DisplayAble a => DisplayAble (E.Value a) where - display = display . E.unValue - -instance DisplayAble a => DisplayAble (CI a) where - display = display . CI.original - instance HasResolution a => DisplayAble (Fixed a) where display = pack . showFixed True