Skip to content

H
haskell-gargantext
Unverified Commit 72a6c405 authored by Nicolas Pouillard's avatar Nicolas Pouillard
Browse files
Options

Add runCmdReplServantErr

parent a08eff3a
Hide whitespace changes
Inline Side-by-side
Showing with 3 additions and 0 deletions
src/Gargantext/API/Settings.hs
View file @ 72a6c405
...@@ -277,6 +277,9 @@ withDevEnv k = do ...@@ -277,6 +277,9 @@ withDevEnv k = do
runCmdRepl :: Show err => Cmd' DevEnv err a -> IO a runCmdRepl :: Show err => Cmd' DevEnv err a -> IO a
runCmdRepl f = withDevEnv $ \env -> runCmdDev env f runCmdRepl f = withDevEnv $ \env -> runCmdDev env f
runCmdReplServantErr :: Cmd' DevEnv ServantErr a -> IO a
runCmdReplServantErr = runCmdRepl
newDevEnv :: IO DevEnv newDevEnv :: IO DevEnv
newDevEnv = newDevEnvWith "gargantext.ini" newDevEnv = newDevEnvWith "gargantext.ini"
......
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