summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJorge Israel Peña <jorgepblank@gmail.com>2013-05-22 17:28:32 -0700
committerJorge Israel Peña <jorgepblank@gmail.com>2013-05-22 17:28:32 -0700
commit294c48ea4819c98270a7373e2c0598ab15d82419 (patch)
tree1c7200c3d35fd4cbb5719509b11b81ea468be529
parente987485e2d6c3b73bf917890d8cf965173af3716 (diff)
downloadhakyll-294c48ea4819c98270a7373e2c0598ab15d82419.tar.gz
finish incomplete comment
-rw-r--r--src/Hakyll/Preview/Poll.hs2
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