Skip to content

H
haskell-gargantext
Commit e9a4cf90 authored by Nicolas Pouillard's avatar Nicolas Pouillard
Browse files
Options

comment

parent 3870ee90
Show whitespace changes
Inline Side-by-side
Showing with 3 additions and 0 deletions
src/Gargantext/API/Admin/Settings.hs
View file @ e9a4cf90
......@@ -110,6 +110,9 @@ repoSaverAction repoDir a = do
hClose h
renameFile fp (repoSnapshot repoDir)
-- The use of mkDebounce makes sure that repoSaverAction is not called too often.
-- If repoSaverAction start taking more time than the debounceFreq then it should
-- be increased.
mkRepoSaver :: RepoDirFilePath -> MVar NgramsRepo -> IO (IO ())
mkRepoSaver repoDir repo_var = mkDebounce settings
where
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment