Fake your webmachine requests for unit testing.

gistfile1.hrl

make_wrq(Method, RawPath, Headers) ->
    {ok, Dispatch} = file:consult(filename:join(
                         [filename:dirname(code:which(?MODULE)),
                          "..", "priv", "dispatch.conf"])),
    R0 = wrq:create(Method, {1,1}, RawPath, mochiweb_headers:from_list(Headers)),
    R1 = wrq:set_peer("127.0.0.1", R0),
    {_, _, HostTokens, Port, PathTokens, Bindings, AppRoot, StringPath} =
        webmachine_dispatcher:dispatch("127.0.0.1", RawPath, Dispatch),
    wrq:load_dispatch_data(Bindings,
                           HostTokens,
                           Port,
                           PathTokens,
                           AppRoot,
                           StringPath,
                           R1).