diff options
Diffstat (limited to 'test/http_SUITE.erl')
-rw-r--r-- | test/http_SUITE.erl | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/test/http_SUITE.erl b/test/http_SUITE.erl index 8ab99cb..0e115e0 100644 --- a/test/http_SUITE.erl +++ b/test/http_SUITE.erl @@ -207,6 +207,7 @@ init_dispatch(Config) -> {"/patch", rest_patch_resource, []}, {"/resetags", rest_resource_etags, []}, {"/rest_expires", rest_expires, []}, + {"/rest_expires_binary", rest_expires_binary, []}, {"/rest_empty_resource", rest_empty_resource, []}, {"/loop_stream_recv", http_loop_stream_recv, []}, {"/", http_handler, []} @@ -687,6 +688,13 @@ rest_expires(Config) -> Expires = LastModified = <<"Fri, 21 Sep 2012 22:36:14 GMT">>, ok. +rest_expires_binary(Config) -> + ConnPid = gun_open(Config), + Ref = gun:get(ConnPid, "/rest_expires_binary"), + {response, nofin, 200, Headers} = gun:await(ConnPid, Ref), + {_, <<"0">>} = lists:keyfind(<<"expires">>, 1, Headers), + ok. + rest_keepalive(Config) -> ConnPid = gun_open(Config), Refs = [gun:get(ConnPid, "/simple") || _ <- lists:seq(1, 10)], |