Mercurial > repos > awetv
annotate server/awetv/src/awesupp.erl @ 0:db5c7047ef0e default tip
Initial commit
author | Mike Pavone <pavone@retrodev.com> |
---|---|
date | Fri, 21 Jun 2013 22:09:34 -0700 |
parents | |
children |
rev | line source |
---|---|
0 | 1 -module(awesupp). |
2 -behavior(supervisor). | |
3 | |
4 -export([start_link/0, init/1]). | |
5 | |
6 start_link() -> | |
7 supervisor:start_link(awesupp, []). | |
8 | |
9 init(_Args) -> | |
10 {ok, { | |
11 {one_for_one, 1, 60}, | |
12 [ | |
13 {awelistener, {awelistener, start_link, []}, permanent, 5000, worker, [awelistener]} | |
14 ]} | |
15 }. | |
16 |