From 352cfce6635fde32348173110f35539bb8459d3f Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Lo=C3=AFc=20Hoguin?= Date: Mon, 13 Jun 2016 17:35:26 +0200 Subject: Fix markdown_middleware example --- test/examples_SUITE.erl | 17 +++++++++++++++++ 1 file changed, 17 insertions(+) (limited to 'test/examples_SUITE.erl') diff --git a/test/examples_SUITE.erl b/test/examples_SUITE.erl index 40a8b9c..096be02 100644 --- a/test/examples_SUITE.erl +++ b/test/examples_SUITE.erl @@ -232,3 +232,20 @@ do_file_server(Transport, Protocol, Config) -> {200, _, _} = do_get(Transport, Protocol, "/test.txt", Config), {200, _, _} = do_get(Transport, Protocol, "/video.html", Config), ok. + +%% Markdown middleware. + +markdown_middleware(Config) -> + doc("Markdown middleware example."), + try + do_compile_and_start(markdown_middleware), + do_markdown_middleware(tcp, http, Config), + do_markdown_middleware(tcp, http2, Config) + after + do_stop(markdown_middleware) + end. + +do_markdown_middleware(Transport, Protocol, Config) -> + {200, Headers, <<"

", _/bits >>} = do_get(Transport, Protocol, "/video.html", Config), + {_, <<"text/html">>} = lists:keyfind(<<"content-type">>, 1, Headers), + ok. -- cgit v1.2.3