diff options
| author | Miguel <m.i@gmx.at> | 2019-02-27 13:04:28 +0100 |
|---|---|---|
| committer | Miguel <m.i@gmx.at> | 2019-02-27 13:04:28 +0100 |
| commit | 96a8dfc44685c69c35264cd95af83d2c2c02220f (patch) | |
| tree | 20c84fccf40a197f37f8597ce80464dbcc81c703 /src/WWWStaticus.hs | |
| parent | 428d1b9565cb9a7c5ea61eaaa5358354912488e8 (diff) | |
added timestamp check, to refresh only when required
Diffstat (limited to 'src/WWWStaticus.hs')
| -rw-r--r-- | src/WWWStaticus.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/WWWStaticus.hs b/src/WWWStaticus.hs index d5205f5..4259964 100644 --- a/src/WWWStaticus.hs +++ b/src/WWWStaticus.hs @@ -65,7 +65,7 @@ getDirList d = map ((d++"/")++) <$> filter (not.isPrefixOf ".") <$> listDirector -- might rely on this runPlugins::[StaticusPlugin]->FilePath->FilePath->FilePath->FilePath->IO() runPlugins plug root dir_out dir_in path = foldlM f init plug >> return () - where f m (StaticusPlugin name run runIO) = runIO m >>= return.run + where f m (StaticusPlugin name run runIO) = if M.lookup "abort" m == Nothing then runIO m >>= return.run else return m init= M.fromList [("path",path) ,("dir_in",dir_in) ,("dir_out",dir_out) |