-module(catlfish_app).

-behaviour(application).

%% Application callbacks
-export([start/2, stop/1]).

%% ===================================================================
%% Application callbacks
%% ===================================================================

dummy() ->
    receive
    after
        infinity ->
            none
    end.

start(_StartType, _StartArgs) ->
    io:format("starting catlfish~n", []),
    InetsResult = inets:start(httpd, [{proplist_file, "httpd_props.conf"}]),
    io:format("catlfish: tried to start inets service: ~p~n", [InetsResult]),
    Pid = spawn(fun () ->
                        dummy()
                end),
    {ok, Pid}.

stop(_State) ->
    ok.