blob: e24a1bbee6a57bd23d71105b64ab10c2db2f4a6a (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
|
%%% Copyright (c) 2014, NORDUnet A/S.
%%% See LICENSE for licensing information.
-module(catlfish_app).
-behaviour(application).
%% Application callbacks
-export([start/2, stop/1]).
-include("catlfish.hrl").
%% ===================================================================
%% Application callbacks
%% ===================================================================
start(normal, Args) ->
case ets:info(?CACHE_TABLE) of
undefined ->
ok;
_ ->
ets:delete(?CACHE_TABLE)
end,
ets:new(?CACHE_TABLE, [set, public, named_table]),
catlfish_sup:start_link(Args).
stop(_State) ->
ok.
|
