git.iko.soy/hakyll
on master help sign in
Bump fsnotify to 0.2
commitdf2bc9fa9e244f77a3fce8591da45ce51dc3005c authorJasper Van der Jeugt <m@jaspervdj.be> dateSat 1 Aug 2015, 10:14 (11 years ago) parent7fedfd3
3 files changed+11−8
compare with master
unifiedsplit
hakyll.cabal+4−4 src/Hakyll/Preview/Poll.hs+3−4 web/releases.markdown+4
hakyll.cabal+4−4
@@ -171,7 +171,7 @@ Library
171171 Build-depends:
172172 snap-core >= 0.6 && < 0.10,
173173 snap-server >= 0.6 && < 0.10,
174− fsnotify >= 0.1 && < 0.2,
174+ fsnotify >= 0.2 && < 0.3,
175175 system-filepath >= 0.4.6 && <= 0.5
176176 Cpp-options:
177177 -DPREVIEW_SERVER
@@ -181,7 +181,7 @@ Library
181181
182182 If flag(watchServer)
183183 Build-depends:
184− fsnotify >= 0.1 && < 0.2,
184+ fsnotify >= 0.2 && < 0.3,
185185 system-filepath >= 0.4.6 && <= 0.5
186186 Cpp-options:
187187 -DWATCH_SERVER
@@ -256,7 +256,7 @@ Test-suite hakyll-tests
256256 Build-depends:
257257 snap-core >= 0.6 && < 0.10,
258258 snap-server >= 0.6 && < 0.10,
259− fsnotify >= 0.1 && < 0.2,
259+ fsnotify >= 0.2 && < 0.3,
260260 system-filepath >= 0.4.6 && <= 0.5
261261 Cpp-options:
262262 -DPREVIEW_SERVER
@@ -266,7 +266,7 @@ Test-suite hakyll-tests
266266
267267 If flag(watchServer)
268268 Build-depends:
269− fsnotify >= 0.1 && < 0.2,
269+ fsnotify >= 0.2 && < 0.3,
270270 system-filepath >= 0.4.6 && <= 0.5
271271 Cpp-options:
272272 -DWATCH_SERVER
src/Hakyll/Preview/Poll.hs+3−4
@@ -12,7 +12,6 @@ import Control.Concurrent.MVar (newEmptyMVar, takeMVar,
1212import Control.Exception (AsyncException, fromException,
1313 handle, throw)
1414import Control.Monad (forever, void, when)
15−import Filesystem.Path.CurrentOS (decodeString, encodeString)
1615import System.Directory (canonicalizePath)
1716import System.FilePath (pathSeparators)
1817import System.FSNotify (Event (..), startManager,
@@ -41,7 +40,7 @@ import Hakyll.Core.Identifier.Pattern
4140-- a site as soon as any changes occur
4241watchUpdates :: Configuration -> IO Pattern -> IO ()
4342watchUpdates conf update = do
44− let providerDir = decodeString $ providerDirectory conf
43+ let providerDir = providerDirectory conf
4544 shouldBuild <- newEmptyMVar
4645 pattern <- update
4746 fullProviderDir <- canonicalizePath $ providerDirectory conf
@@ -66,7 +65,7 @@ watchUpdates conf update = do
6665 (\e -> case fromException e of
6766 Nothing -> putStrLn (show e)
6867 Just async -> throw (async :: AsyncException))
69− (update' event $ encodeString providerDir)
68+ (update' event providerDir)
7069
7170 -- Send an event whenever something occurs so that the thread described
7271 -- above will do a build.
@@ -107,7 +106,7 @@ watchUpdates conf update = do
107106
108107--------------------------------------------------------------------------------
109108eventPath :: Event -> FilePath
110−eventPath evt = encodeString $ evtPath evt
109+eventPath evt = evtPath evt
111110 where
112111 evtPath (Added p _) = p
113112 evtPath (Modified p _) = p
web/releases.markdown+4
@@ -4,6 +4,10 @@ title: Releases
44
55# Releases
66
7+## Hakyll 4.7.2.1
8+
9+- Bump fsnotify dependency to 0.2
10+
711## Hakyll 4.7.2.0
812
913- Improve documentation of `getResourceXXX` functions (contribution by Matthias