git.iko.soy/typeable/reflex-dom-extra
on master help sign in
remove unused unsafeInnerHTML and some deps
commit6da13de9e9050b06e5d13d8f3b8eceabf5213438 authorodr <dima.typeable.io> dateSun 12 Jan 2025, 14:19 (2 years ago) parent2514d9d
2 files changed+6−6
unifiedsplit
reflex-dom-extra.cabal+2−4 src/Reflex/Dom/Extra.hs+4−2
reflex-dom-extra.cabal+2−4
@@ -18,14 +18,10 @@ library
1818 , Reflex.Dom.Pagination
1919 build-depends: base >=4.7 && <5
2020 , containers
21− , jsaddle
2221 , lens
2322 , reflex-dom
2423 , semialign
2524 , text
26− if impl(ghcjs)
27− build-depends:
28− ghcjs-base
2925 hs-source-dirs: src
3026 default-language: Haskell2010
3127 ghc-options: -Wall
@@ -35,3 +31,5 @@ library
3531 , RecordWildCards
3632 , RecursiveDo
3733 , ViewPatterns
34+ if impl(ghc >= 8.10)
35+ ghc-options: -Wunused-packages
src/Reflex/Dom/Extra.hs+4−2
@@ -10,10 +10,10 @@ import Data.Map as M
1010import Data.Maybe
1111import Data.Text as T hiding (zip, map)
1212import Data.Zip as Z
13−import Language.Javascript.JSaddle
13+-- import Language.Javascript.JSaddle
1414import Prelude hiding (zip, unzip, zipWith)
1515import Reflex.Dom
16−import JavaScript.Object.Internal as JS
16+-- import JavaScript.Object.Internal as JS
1717
1818-- | @<meta>@ element.
1919meta :: DomBuilder t m => Map Text Text -> m ()
@@ -226,6 +226,7 @@ separateEitherE
226226 -> (Event t (Either a b), Event t (Either a b))
227227separateEitherE = separateE isLeft
228228
229+{-
229230-- | Assigns HTML content to an element, allows embedding of arbitrary
230231-- HTML tags, so make sure you trust the source of the second argument
231232-- @
@@ -237,6 +238,7 @@ unsafeInnerHTML rel html = liftJSM $ do
237238 htmlVal <- toJSVal html
238239 relVal <- toJSVal rel
239240 JS.setProp "innerHTML" htmlVal (JS.Object relVal)
241+-}
240242
241243-- | input element which is changes while edited.
242244-- It is useful to input dates, phones etc