Fix an unused variable warning in Reflex.Spider.Internal
commit5cb4b9c5869a3da1cca8ab8cc3a3ce1fe3bcdfaa
authorRyan Trinkle <ryan.trinkle@gmail.com>
dateWed 15 Jul 2015, 16:17 (11 years ago)
parent4c4ca91
src/Reflex/Spider/Internal.hs+1−1
@@ -532,7 +532,7 @@ run roots after = do
532532 then do scheduleRootClear occRef
533533 return $ Just r
534534 else return Nothing
535− forM_ (catMaybes rootsToPropagate) $ \(RootTrigger (subscribersRef, _, k) :=> a) -> do
535+ forM_ (catMaybes rootsToPropagate) $ \(RootTrigger (subscribersRef, _, _) :=> a) -> do
536536 propagateAndUpdateSubscribersRef subscribersRef a
537537 delayedRef <- EventM $ asks eventEnvDelayedMerges
538538 let go = do