git.iko.soy/reflex-dom
on develop help sign in
Fix build errors
dae5e8bDan Haraj
reflex-dom-core/reflex-dom-core.cabal+2
compare with develop
unifiedsplit
@@ -94,6 +94,8 @@ library
94 Reflex.Dom.Core
94 Reflex.Dom.Core
95 Reflex.Dom.Location
95 Reflex.Dom.Location
96 Reflex.Dom.Main
96 Reflex.Dom.Main
97+ Reflex.Dom.Modals.Base
98+ Reflex.Dom.Modals.Class
97 Reflex.Dom.Old
99 Reflex.Dom.Old
98 Reflex.Dom.Prerender
100 Reflex.Dom.Prerender
99 Reflex.Dom.Time
101 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
96 atomicModifyRef r = lift . atomicModifyRef r
96 atomicModifyRef r = lift . atomicModifyRef r
97
97
98instance (MonadAdjust t m, MonadHold t m) => MonadAdjust t (ModalsT t m) where
98instance (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)))
100 traverseDMapWithKeyWithAdjust f dm0 dm' = ModalsT $ traverseDMapWithKeyWithAdjust (coerce f) dm0 dm'
100 traverseDMapWithKeyWithAdjust f dm0 dm' = ModalsT $ traverseDMapWithKeyWithAdjust (coerce f) dm0 dm'
101 traverseDMapWithKeyWithAdjustWithMove f dm0 dm' = ModalsT $ traverseDMapWithKeyWithAdjustWithMove (coerce f) dm0 dm'
101 traverseDMapWithKeyWithAdjustWithMove f dm0 dm' = ModalsT $ traverseDMapWithKeyWithAdjustWithMove (coerce f) dm0 dm'
102
102