Skip to content

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

[READING] Type declared at the right place

parent a3861819
Hide whitespace changes
Inline Side-by-side
Showing with 2 additions and 1 deletion
src/Gargantext/API/Admin/Settings.hs
View file @ ddbdc6d1
...@@ -194,4 +194,3 @@ cleanEnv env = do ...@@ -194,4 +194,3 @@ cleanEnv env = do
repoSaverAction (env ^. hasConfig . gc_repofilepath) r repoSaverAction (env ^. hasConfig . gc_repofilepath) r
unlockFile (env ^. repoEnv . renv_lock) unlockFile (env ^. repoEnv . renv_lock)
type IniPath = FilePath
src/Gargantext/API/Dev.hs
View file @ ddbdc6d1
...@@ -24,7 +24,9 @@ import Gargantext.API.Ngrams (saveRepo) ...@@ -24,7 +24,9 @@ import Gargantext.API.Ngrams (saveRepo)
import Gargantext.Database.Prelude import Gargantext.Database.Prelude
import Gargantext.Prelude import Gargantext.Prelude
import Gargantext.Prelude.Config (GargConfig(..), readConfig) import Gargantext.Prelude.Config (GargConfig(..), readConfig)
import System.IO (FilePath)
type IniPath = FilePath
------------------------------------------------------------------- -------------------------------------------------------------------
withDevEnv :: IniPath -> (DevEnv -> IO a) -> IO a withDevEnv :: IniPath -> (DevEnv -> IO a) -> IO a
withDevEnv iniPath k = do withDevEnv iniPath k = 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