diff options
| -rw-r--r-- | app/Server.hs | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/app/Server.hs b/app/Server.hs index a045b07..c220307 100644 --- a/app/Server.hs +++ b/app/Server.hs @@ -1843,6 +1843,7 @@ fileNotFound = throwServantError :: (MonadIO m) => ServerError -> m a #else throwServantError :: (MonadIO m) => ServantErr -> m a +#endif throwServantError = liftIO . throwIO server :: Environment -> ServerT API Handler |