git.iko.soy/typeable/bloodhound
on master help sign in
README tweaks
e9efc72Chris Allen
README.org+20−1
compare with master
unifiedsplit
@@ -55,11 +55,19 @@ response <- createIndex testServer defaultIndexSettings testIndex
55
55
56*** Delete Index
56*** Delete Index
57
57
58+**** Code
59+
58#+BEGIN_SRC haskell
60#+BEGIN_SRC haskell
59
61
60-- response :: Reply
62-- response :: Reply
61response <- deleteIndex testServer testIndex
63response <- deleteIndex testServer testIndex
62
64
65+#+END_SRC
66+
67+**** Example Response
68+
69+#+BEGIN_SRC haskell
70+
63-- print response if it was a success
71-- print response if it was a success
64Response {responseStatus = Status {statusCode = 200, statusMessage = "OK"}
72Response {responseStatus = Status {statusCode = 200, statusMessage = "OK"}
65 , responseVersion = HTTP/1.1
73 , responseVersion = HTTP/1.1
@@ -88,6 +96,12 @@ Response {responseStatus = Status {statusCode = 404, statusMessage = "Not Found"
88
96
89resp <- refreshIndex testServer testIndex
97resp <- refreshIndex testServer testIndex
90
98
99+#+END_SRC
100+
101+**** Example Response
102+
103+#+BEGIN_SRC haskell
104+
91-- print resp on success
105-- print resp on success
92Response {responseStatus = Status {statusCode = 200, statusMessage = "OK"}
106Response {responseStatus = Status {statusCode = 200, statusMessage = "OK"}
93 , responseVersion = HTTP/1.1
107 , responseVersion = HTTP/1.1
@@ -176,7 +190,12 @@ instance FromJSON Location
176
190
177resp <- indexDocument testServer testIndex testMapping exampleTweet (DocId "1")
191resp <- indexDocument testServer testIndex testMapping exampleTweet (DocId "1")
178
192
179−-- print resp on success
193+#+END_SRC
194+
195+**** Example Response
196+
197+#+BEGIN_SRC haskell
198+
180Response {responseStatus =
199Response {responseStatus =
181 Status {statusCode = 200, statusMessage = "OK"}
200 Status {statusCode = 200, statusMessage = "OK"}
182 , responseVersion = HTTP/1.1, responseHeaders =
201 , responseVersion = HTTP/1.1, responseHeaders =