server: tiny refactoring
This commit is contained in:
parent
385ea2686b
commit
dd92bfd565
1 changed files with 1 additions and 1 deletions
|
@ -66,7 +66,7 @@ import Servant.Server.Internal.ServantErr
|
|||
class HasServer layout where
|
||||
type ServerT layout (m :: * -> *) :: *
|
||||
|
||||
route :: Proxy layout -> Delayed (Server layout) -> Router
|
||||
route :: Proxy layout -> Delayed (ServerT layout (ExceptT ServantErr IO)) -> Router
|
||||
|
||||
type Server layout = ServerT layout (ExceptT ServantErr IO)
|
||||
|
||||
|
|
Loading…
Reference in a new issue