Skip to content

haskell-gargantext
haskell-gargantext
Commit 06aa56b6 authored by Alexandre Delanoë's avatar Alexandre Delanoë
Browse files
Options

[DOC] some TODOs

parent ca9e6e9a
Hide whitespace changes
Inline Side-by-side
Showing with 2 additions and 0 deletions
src/Gargantext/API/Settings.hs
View file @ 06aa56b6
...@@ -175,9 +175,11 @@ data MockEnv = MockEnv ...@@ -175,9 +175,11 @@ data MockEnv = MockEnv
makeLenses ''MockEnv makeLenses ''MockEnv
-- | TODO add this path in Settings
repoSnapshot :: FilePath repoSnapshot :: FilePath
repoSnapshot = "repo.json" repoSnapshot = "repo.json"
-- | TODO add hard coded file in Settings
-- This assumes we own the lock on repoSnapshot. -- This assumes we own the lock on repoSnapshot.
repoSaverAction :: ToJSON a => a -> IO () repoSaverAction :: ToJSON a => a -> IO ()
repoSaverAction a = do repoSaverAction a = do
......
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