diff options
| -rw-r--r-- | src/Hakyll/Preview/Poll.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Hakyll/Preview/Poll.hs b/src/Hakyll/Preview/Poll.hs index 5ab8600..ab183f7 100644 --- a/src/Hakyll/Preview/Poll.hs +++ b/src/Hakyll/Preview/Poll.hs @@ -64,7 +64,7 @@ watchUpdates conf update = do #else update' event provider = do let path = provider </> eventPath event - -- on windows + -- on windows, a 'Modified' event is also sent on file deletion fileExists <- doesFileExist path when fileExists . void $ waitOpen path ReadMode (\_ -> update) 10 |