From 5295ac7f7f26c3a43f0fe9b9c826e876b29cf666 Mon Sep 17 00:00:00 2001
From: Avi Dessauer <avi.the.coder@gmail.com>
Date: Wed, 21 Aug 2019 05:59:18 -0400
Subject: Bump 8.6.5 plans to lts-14 (#41)

---
 app/Server.hs | 8 ++++++++
 1 file changed, 8 insertions(+)

(limited to 'app/Server.hs')

diff --git a/app/Server.hs b/app/Server.hs
index 30109e6..fa786c2 100644
--- a/app/Server.hs
+++ b/app/Server.hs
@@ -125,7 +125,11 @@ import Servant
   , Header
   , Headers
   , QueryParam
+#if MIN_VERSION_GLASGOW_HASKELL(8,6,5,0)
+  , ServerError
+#else
   , ServantErr
+#endif
   , ServerT
   , ToHttpApiData(..)
   , addHeader
@@ -1835,7 +1839,11 @@ fileNotFound :: Response
 fileNotFound =
   responseLBS status404 [("Content-Type", "text/plain")] "Not found"
 
+#if MIN_VERSION_GLASGOW_HASKELL(8,6,5,0)
+throwServantError :: (MonadIO m) => ServerError -> m a
+#else
 throwServantError :: (MonadIO m) => ServantErr -> m a
+#endif
 throwServantError = liftIO . throwIO 
 
 server :: Environment -> ServerT API Handler
-- 
cgit v1.2.3