From 4c09b960531ff51d64203765263d88768915d3db Mon Sep 17 00:00:00 2001 From: Alexandre Esteves Date: Mon, 29 Aug 2022 02:49:43 +0100 Subject: [PATCH] Remove unused imports --- reflex-dom-core/src/Reflex/Dom/Builder/Class.hs | 3 +-- reflex-dom-core/src/Reflex/Dom/Location.hs | 1 - reflex-dom-core/src/Reflex/Dom/Prerender.hs | 1 - reflex-dom-core/src/Reflex/Dom/Widget/Basic.hs | 1 - reflex-dom-core/src/Reflex/Dom/Widget/Input.hs | 1 - reflex-dom-core/src/Reflex/Dom/Widget/Lazy.hs | 1 - reflex-dom-core/src/Reflex/Dom/Widget/Resize.hs | 2 -- reflex-dom-core/src/Reflex/Dom/Xhr/FormData.hs | 1 - 8 files changed, 1 insertion(+), 10 deletions(-) diff --git a/reflex-dom-core/src/Reflex/Dom/Builder/Class.hs b/reflex-dom-core/src/Reflex/Dom/Builder/Class.hs index c75eb501..c5f22c17 100644 --- a/reflex-dom-core/src/Reflex/Dom/Builder/Class.hs +++ b/reflex-dom-core/src/Reflex/Dom/Builder/Class.hs @@ -57,7 +57,6 @@ import Data.Map (Map) import qualified Data.Map as Map import Data.Maybe import Data.Proxy -import Data.Semigroup import Data.Semigroup.Commutative import Data.String import Data.Text (Text) @@ -750,7 +749,7 @@ instance HasDocument m => HasDocument (QueryT t q m) class HasSetValue a where type SetValue a :: * setValue :: Lens' a (SetValue a) - + instance Reflex t => HasSetValue (TextAreaElementConfig er t m) where type SetValue (TextAreaElementConfig er t m) = Event t Text setValue = textAreaElementConfig_setValue diff --git a/reflex-dom-core/src/Reflex/Dom/Location.hs b/reflex-dom-core/src/Reflex/Dom/Location.hs index d2454a0e..ee880fd2 100644 --- a/reflex-dom-core/src/Reflex/Dom/Location.hs +++ b/reflex-dom-core/src/Reflex/Dom/Location.hs @@ -26,7 +26,6 @@ import Control.Lens ((^.)) import Control.Monad ((>=>)) import Control.Monad.Fix (MonadFix) import Data.Align (align) -import Data.Monoid import Data.Text (Text) import Data.These (These(..)) import qualified GHCJS.DOM as DOM diff --git a/reflex-dom-core/src/Reflex/Dom/Prerender.hs b/reflex-dom-core/src/Reflex/Dom/Prerender.hs index b7e9cbda..dcdcbff7 100644 --- a/reflex-dom-core/src/Reflex/Dom/Prerender.hs +++ b/reflex-dom-core/src/Reflex/Dom/Prerender.hs @@ -30,7 +30,6 @@ import Data.Semigroup (Semigroup) import Data.Semigroup.Commutative import Data.Text (Text) import Data.Void -import Foreign.JavaScript.TH import GHCJS.DOM.Types (MonadJSM) import Reflex hiding (askEvents) import Reflex.Dom.Builder.Class diff --git a/reflex-dom-core/src/Reflex/Dom/Widget/Basic.hs b/reflex-dom-core/src/Reflex/Dom/Widget/Basic.hs index 1a73d902..b6d83d9f 100644 --- a/reflex-dom-core/src/Reflex/Dom/Widget/Basic.hs +++ b/reflex-dom-core/src/Reflex/Dom/Widget/Basic.hs @@ -70,7 +70,6 @@ import Reflex.Network import Reflex.PostBuild.Class import Reflex.Workflow -import Control.Arrow import Control.Lens hiding (children, element) import Control.Monad.Reader hiding (forM, forM_, mapM, mapM_, sequence, sequence_) import Data.Align diff --git a/reflex-dom-core/src/Reflex/Dom/Widget/Input.hs b/reflex-dom-core/src/Reflex/Dom/Widget/Input.hs index 2c67fcd3..9f7b0195 100644 --- a/reflex-dom-core/src/Reflex/Dom/Widget/Input.hs +++ b/reflex-dom-core/src/Reflex/Dom/Widget/Input.hs @@ -30,7 +30,6 @@ import Data.Functor.Misc import Data.Map (Map) import qualified Data.Map as Map import Data.Maybe -import Data.Semigroup import Data.Text (Text) import qualified Data.Text as T import GHCJS.DOM.HTMLInputElement (HTMLInputElement) diff --git a/reflex-dom-core/src/Reflex/Dom/Widget/Lazy.hs b/reflex-dom-core/src/Reflex/Dom/Widget/Lazy.hs index 709bfe40..e960a75d 100644 --- a/reflex-dom-core/src/Reflex/Dom/Widget/Lazy.hs +++ b/reflex-dom-core/src/Reflex/Dom/Widget/Lazy.hs @@ -20,7 +20,6 @@ import Control.Monad.Fix import Data.Fixed import Data.Map (Map) import qualified Data.Map as Map -import Data.Monoid import Data.Text (Text) import qualified Data.Text as T import GHCJS.DOM.Element diff --git a/reflex-dom-core/src/Reflex/Dom/Widget/Resize.hs b/reflex-dom-core/src/Reflex/Dom/Widget/Resize.hs index f6fd95ed..37e48fb7 100644 --- a/reflex-dom-core/src/Reflex/Dom/Widget/Resize.hs +++ b/reflex-dom-core/src/Reflex/Dom/Widget/Resize.hs @@ -16,12 +16,10 @@ import Reflex.PerformEvent.Class import Reflex.PostBuild.Class import Reflex.TriggerEvent.Class -import Control.Monad import Control.Monad.Fix import Control.Monad.IO.Class import Data.Map (Map) import qualified Data.Map as Map -import Data.Monoid import Data.Text (Text) import qualified Data.Text as T import GHCJS.DOM.Element diff --git a/reflex-dom-core/src/Reflex/Dom/Xhr/FormData.hs b/reflex-dom-core/src/Reflex/Dom/Xhr/FormData.hs index 664e003f..629188cf 100644 --- a/reflex-dom-core/src/Reflex/Dom/Xhr/FormData.hs +++ b/reflex-dom-core/src/Reflex/Dom/Xhr/FormData.hs @@ -14,7 +14,6 @@ import Data.Map (Map) import Data.Text (Text) import Data.Traversable import qualified GHCJS.DOM.FormData as FD -import Foreign.JavaScript.TH import GHCJS.DOM.File (getName) import GHCJS.DOM.Types (File, IsBlob) import Language.Javascript.JSaddle.Monad (MonadJSM, liftJSM)