~jack/misc

91882d00f99e24c3ee5b3955a04d8be22625e0c1 — Jack Kelly 7 months ago 668b25e
Make watchDir call mirror slides
1 files changed, 1 insertions(+), 1 deletions(-)

M reflex-gl-demo/src/Reflex/FSNotify.hs
M reflex-gl-demo/src/Reflex/FSNotify.hs => reflex-gl-demo/src/Reflex/FSNotify.hs +1 -1
@@ 9,4 9,4 @@ watchDir
  :: TriggerEvent t m
  => FS.WatchManager -> FilePath -> m (Event t FS.Event)
watchDir manager path = newEventWithLazyTriggerWithOnComplete $ \fire ->
  FS.watchDir manager path (const True) (`fire` pure ())
  FS.watchDir manager path (\_ -> True) (\fsEvent -> fire fsEvent (pure ()))