aboutsummaryrefslogtreecommitdiffstats
path: root/src/cowboy_cookies.erl
diff options
context:
space:
mode:
authorTom Burdick <[email protected]>2011-07-18 15:50:29 -0500
committerLoïc Hoguin <[email protected]>2011-07-26 13:53:52 +0200
commitb75859e07511fc07954542872dd18548f3f7d4fc (patch)
treeb92fab7616a28eeb3aa98b34665f0ec4467cb879 /src/cowboy_cookies.erl
parent5bd936db6606a27dfd91a0e2675889b58c212376 (diff)
downloadcowboy-b75859e07511fc07954542872dd18548f3f7d4fc.tar.gz
cowboy-b75859e07511fc07954542872dd18548f3f7d4fc.tar.bz2
cowboy-b75859e07511fc07954542872dd18548f3f7d4fc.zip
Fail early in cookie-related API functions
Diffstat (limited to 'src/cowboy_cookies.erl')
-rw-r--r--src/cowboy_cookies.erl6
1 files changed, 3 insertions, 3 deletions
diff --git a/src/cowboy_cookies.erl b/src/cowboy_cookies.erl
index acaefee..8a11b19 100644
--- a/src/cowboy_cookies.erl
+++ b/src/cowboy_cookies.erl
@@ -43,17 +43,17 @@
-spec parse_cookie(binary()) -> kvlist().
parse_cookie(<<>>) ->
[];
-parse_cookie(Cookie) ->
+parse_cookie(Cookie) when is_binary(Cookie) ->
parse_cookie(Cookie, []).
%% @doc Short-hand for <code>cookie(Key, Value, [])</code>.
-spec cookie(binary(), binary()) -> kvlist().
-cookie(Key, Value) ->
+cookie(Key, Value) when is_binary(Key) andalso is_binary(Value) ->
cookie(Key, Value, []).
%% @doc Generate a Set-Cookie header field tuple.
-spec cookie(binary(), binary(), [cookie_option()]) -> kvlist().
-cookie(Key, Value, Options) ->
+cookie(Key, Value, Options) when is_binary(Key) andalso is_binary(Value) andalso is_list(Options) ->
Cookie = <<(any_to_binary(Key))/binary, "=", (quote(Value))/binary, "; Version=1">>,
%% Set-Cookie:
%% Comment, Domain, Max-Age, Path, Secure, Version