From c645b682e72ae531ba521022f232f505122bfc97 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Lo=C3=AFc=20Hoguin?= Date: Tue, 22 Mar 2011 13:18:53 +0100 Subject: Fix spec for cowboy_http_req:body/1 and body/2. --- src/cowboy_http_req.erl | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'src') diff --git a/src/cowboy_http_req.erl b/src/cowboy_http_req.erl index cb09282..ad9bf94 100644 --- a/src/cowboy_http_req.erl +++ b/src/cowboy_http_req.erl @@ -140,7 +140,7 @@ headers(Req) -> %% @todo We probably want to allow a max length. -spec body(Req::#http_req{}) - -> {Body::binary(), Req::#http_req{}} | {error, Reason::posix()}. + -> {ok, Body::binary(), Req::#http_req{}} | {error, Reason::posix()}. body(Req) -> {Length, Req2} = cowboy_http_req:header('Content-Length', Req), case Length of @@ -152,7 +152,7 @@ body(Req) -> %% @todo We probably want to configure the timeout. -spec body(Length::non_neg_integer(), Req::#http_req{}) - -> {Body::binary(), Req::#http_req{}} | {error, Reason::posix()}. + -> {ok, Body::binary(), Req::#http_req{}} | {error, Reason::posix()}. body(Length, Req=#http_req{socket=Socket, transport=Transport, body_state=waiting}) -> Transport:setopts(Socket, [{packet, raw}]), case Transport:recv(Socket, Length, 5000) of -- cgit v1.2.3