auto-update 0.2.5 → 0.2.6

raw patch · 3 files changed

+27/−6 lines, 3 filesPVP ok

version bump matches the API change (PVP)

API changes (from Hackage documentation)

Files

• ChangeLog.md +5/−0
• Control/AutoUpdate.hs +19/−2
• auto-update.cabal +3/−4

@@ -1,5 +1,10 @@ # ChangeLog for auto-update +## 0.2.6++* Using the thread version of AutoUpdate for non-threaded RTS.+  [#1020](https://github.com/yesodweb/wai/pull/1020)+ ## 0.2.5  * Thread less autoupdate

@@ -45,9 +45,26 @@ ) where +import Control.AutoUpdate.Types #ifdef mingw32_HOST_OS import Control.AutoUpdate.Thread #else-import Control.AutoUpdate.Event+import qualified Control.AutoUpdate.Event as Event+import qualified Control.AutoUpdate.Thread as Thread++import GHC.Event++mkAutoUpdate :: UpdateSettings a -> IO (IO a)+mkAutoUpdate settings = do+    mmgr <- getSystemEventManager+    case mmgr of+      Nothing -> Thread.mkAutoUpdate settings+      Just _m -> Event.mkAutoUpdate settings++mkAutoUpdateWithModify :: UpdateSettings a -> (a -> IO a) -> IO (IO a)+mkAutoUpdateWithModify settings f = do+    mmgr <- getSystemEventManager+    case mmgr of+      Nothing -> Thread.mkAutoUpdateWithModify settings f+      Just _m -> Event.mkAutoUpdateWithModify settings f #endif-import Control.AutoUpdate.Types

@@ -1,5 +1,5 @@ name:                auto-update-version:             0.2.5+version:             0.2.6 synopsis:            Efficiently run periodic, on-demand actions description:         API docs and the README are available at <http://www.stackage.org/package/auto-update>. homepage:            https://github.com/yesodweb/wai@@ -21,9 +21,8 @@                        Control.Reaper                        Control.Reaper.Internal   other-modules:       Control.AutoUpdate.Types-  if os(windows)-    other-modules:     Control.AutoUpdate.Thread-  else+                       Control.AutoUpdate.Thread+  if !os(windows)     exposed-modules:   Control.AutoUpdate.Internal     other-modules:     Control.AutoUpdate.Event   build-depends:       base >= 4.12 && < 5,