From b3e35fbc79ec315179f12d1bcfe0e4b2c939c98d Mon Sep 17 00:00:00 2001
From: Ivan Lazar Miljenovic <Ivan.Miljenovic@gmail.com>
Date: Mon, 9 Oct 2017 13:22:54 +1100
Subject: [PATCH] Make sure tutorial can build

---
 doc/tutorial/Docs.lhs       | 4 ++++
 doc/tutorial/tutorial.cabal | 1 +
 2 files changed, 5 insertions(+)

diff --git a/doc/tutorial/Docs.lhs b/doc/tutorial/Docs.lhs
index 158b3ef9..91c93c71 100644
--- a/doc/tutorial/Docs.lhs
+++ b/doc/tutorial/Docs.lhs
@@ -23,6 +23,7 @@ import Network.Wai
 import Servant.API
 import Servant.Docs
 import Servant.Server
+import Web.FormUrlEncoded(FromForm(..), ToForm(..))
 ```
 
 And we'll import some things from one of our earlier modules
@@ -218,6 +219,9 @@ type ExampleAPI2 = "position" :> Capture "x" Int :> Capture "y" Int :> Get '[JSO
       :<|> "hello" :> QueryParam "name" String :> Get '[JSON] HelloMessage
       :<|> "marketing" :> ReqBody '[JSON, FormUrlEncoded] ClientInfo :> Post '[JSON] Email
 
+instance ToForm ClientInfo
+instance FromForm ClientInfo
+
 exampleAPI2 :: Proxy ExampleAPI2
 exampleAPI2 = Proxy
 
diff --git a/doc/tutorial/tutorial.cabal b/doc/tutorial/tutorial.cabal
index 69d0b0bf..8c23a49d 100644
--- a/doc/tutorial/tutorial.cabal
+++ b/doc/tutorial/tutorial.cabal
@@ -31,6 +31,7 @@ library
                      , servant-docs == 0.11.*
                      , servant-js >= 0.9 && <0.10
                      , warp
+                     , http-api-data
                      , http-media
                      , lucid
                      , time