Merge fb583cc into 2077c53

src/m_http.app.src

@@ -10,6 +10,7 @@
          datum,
          hackney
       ]},
+      {mod, {m_http_app, []}},
       {env, []}
    ]
 }.  

src/m_http.erl

@@ -250,7 +250,7 @@ request() ->
             lens:get(l_req_url(), State),
             lens:get(l_req_headers(), State),
             lens:get(l_req_payload(), State),
-            SOpts
+            [{pool, m_http_pool} | SOpts]
          )
       of
          {ok, Code, Head, Stream} ->

src/m_http_app.erl

@@ -0,0 +1,16 @@
+-module(m_http_app).
+-behaviour(application).
+
+-export([start/2, stop/1]).
+
+%%
+%%
+start(_Type, _Args) ->
+   ok = hackney_pool:start_pool(m_http_pool, []),
+   {ok, self()}.
+
+%%
+%%
+stop(_State) ->
+   hackney_pool:stop_pool(m_http_pool),
+   ok.

test/m_http_SUITE.erl

@@ -21,7 +21,7 @@
 -compile({parse_transform, category}).
 -compile({parse_transform, generic}).
 
--export([all/0]).
+-export([all/0, init_per_suite/1, end_per_suite/1]).
 -compile(export_all).
 
 %%
@@ -33,6 +33,14 @@ all() ->
       NAry =:= 1
    ].
 
+%%
+init_per_suite(Config) ->
+   {ok, _} = application:ensure_all_started(m_http),
+   Config.
+
+end_per_suite(_) ->
+   application:stop(m_http).
+
 %%
 http_pass_method(_) ->
    m_http_mock:init(200, [], []),