git.iko.soy/reflex-dom
on develop help sign in
Fix build errors
commitdae5e8b98a4ba1ffc74655ba1a28bf71f374f1e0 authorDan Haraj <dan@obsidian.systems> dateThu 15 Jun 2017, 11:34 (9 years ago) parentbde7b31
2 files changed+3−1
compare with develop
unifiedsplit
reflex-dom-core/reflex-dom-core.cabal+2 reflex-dom-core/src/Reflex/Dom/Modals/Base.hs+1−1
reflex-dom-core/reflex-dom-core.cabal+2
@@ -94,6 +94,8 @@ library
9494 Reflex.Dom.Core
9595 Reflex.Dom.Location
9696 Reflex.Dom.Main
97+ Reflex.Dom.Modals.Base
98+ Reflex.Dom.Modals.Class
9799 Reflex.Dom.Old
98100 Reflex.Dom.Prerender
99101 Reflex.Dom.Time
reflex-dom-core/src/Reflex/Dom/Modals/Base.hs+1−1
@@ -96,7 +96,7 @@ instance MonadAtomicRef m => MonadAtomicRef (ModalsT t m) where
9696 atomicModifyRef r = lift . atomicModifyRef r
9797
9898instance (MonadAdjust t m, MonadHold t m) => MonadAdjust t (ModalsT t m) where
99− runWithReplace = coerce runWithReplace -- coerce (runWithReplace :: Unwrapped (ModalsT t m a) -> Event t (Unwrapped (ModalsT t m b)) -> Unwrapped (ModalsT t m (a, Event t b)))
99+ runWithReplace = coerce (runWithReplace :: Unwrapped (ModalsT t m a) -> Event t (Unwrapped (ModalsT t m b)) -> Unwrapped (ModalsT t m (a, Event t b)))
100100 traverseDMapWithKeyWithAdjust f dm0 dm' = ModalsT $ traverseDMapWithKeyWithAdjust (coerce f) dm0 dm'
101101 traverseDMapWithKeyWithAdjustWithMove f dm0 dm' = ModalsT $ traverseDMapWithKeyWithAdjustWithMove (coerce f) dm0 dm'
102102