From a87067a6c1cf03fada25bb5ab8f095c479ea5d40 Mon Sep 17 00:00:00 2001 From: David Turner Date: Tue, 16 May 2017 09:51:50 +0000 Subject: [PATCH] Actually, serve this one so it's useful in the Docs tutorial --- doc/tutorial/Server.lhs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/doc/tutorial/Server.lhs b/doc/tutorial/Server.lhs index 9b81d30e..75119cf6 100644 --- a/doc/tutorial/Server.lhs +++ b/doc/tutorial/Server.lhs @@ -1023,10 +1023,10 @@ serverFor = error "..." TODO prose ``` haskell -type CombinedAPI2 = CombinedAPI :<|> EmptyAPI +type CombinedAPI2 = API :<|> EmptyAPI server11 :: Server CombinedAPI2 -server11 = server10 :<|> emptyAPIServer +server11 = server3 :<|> emptyAPIServer ``` ## Using another monad for your handlers