@@ -108,6 +108,8 @@ mkAutoUpdate us = mkAutoUpdateHelper us Nothing
108-- | Generate an action which will either read from an automatically
108-- | Generate an action which will either read from an automatically
109-- updated value, or run the update action in the current thread if
109-- updated value, or run the update action in the current thread if
110-- the first time or the provided modify action after that.
110-- the first time or the provided modify action after that.
111mkAutoUpdateWithModify :: UpdateSettings a -> (a -> IO a) -> IO (IO a)
113mkAutoUpdateWithModify :: UpdateSettings a -> (a -> IO a) -> IO (IO a)
112mkAutoUpdateWithModify us f = mkAutoUpdateHelper us (Just f)
114mkAutoUpdateWithModify us f = mkAutoUpdateHelper us (Just f)