graninas/Hydra
1
1
Fork 0
mirror of https://github.com/graninas/Hydra.git synced 2024-12-26 18:43:41 +03:00
Code Issues Projects Releases Wiki Activity

warnings unused var

Browse Source
This commit is contained in:
Daneel Yaitskov 2020-05-09 16:29:48 -07:00
parent e07fff4f39
commit 129580e091
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lib/Hydra/src/Hydra/Core/Lang/Interpreter.hs
View File

@ -86,7 +86,7 @@ interpretLangF coreRt (L.GetSqlDBConnection cfg next) = do
$ next $ Left $ D.DBError D.ConnectionDoesNotExist $ next $ Left $ D.DBError D.ConnectionDoesNotExist
$ "Connection for " <> show connTag <> " not found." $ "Connection for " <> show connTag <> " not found."
interpretLangF _ (L.ThrowException exc next) = throwIO exc interpretLangF _ (L.ThrowException exc _) = throwIO exc
interpretLangF coreRt (L.RunSafely act next) = do interpretLangF coreRt (L.RunSafely act next) = do
eResult <- try $ runLangL coreRt act eResult <- try $ runLangL coreRt act