Skip to content

Commit

Permalink
Tweak a test.
Browse files Browse the repository at this point in the history
  • Loading branch information
fukamachi committed Jul 28, 2015
1 parent d39ea8c commit 8f3279a
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion t/dexador.lisp
Original file line number Diff line number Diff line change
Expand Up @@ -185,7 +185,7 @@ body: \"Within a couple weeks of learning Lisp I found programming in any other
(lambda (env)
(declare (ignore env))
'(200 (:content-type "text/plain") ("hi")))
(let ((body (dex:get "http://localhost:4242/" :want-stream t :keep-alive nil :use-connection-pool nil)))
(let ((body (dex:get "http://localhost:4242/" :want-stream t :keep-alive nil)))
(is-type body 'stream)
(let ((buf (make-array 2 :element-type '(unsigned-byte 8))))
(read-sequence buf body)
Expand Down

0 comments on commit 8f3279a

Please sign in to comment.