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
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
0
db5c7047ef0e Initial commit
Mike Pavone <pavone@retrodev.com>
parents:
diff changeset
1 -module(awesupp).
db5c7047ef0e Initial commit
Mike Pavone <pavone@retrodev.com>
parents:
diff changeset
2 -behavior(supervisor).
db5c7047ef0e Initial commit
Mike Pavone <pavone@retrodev.com>
parents:
diff changeset
3
db5c7047ef0e Initial commit
Mike Pavone <pavone@retrodev.com>
parents:
diff changeset
4 -export([start_link/0, init/1]).
db5c7047ef0e Initial commit
Mike Pavone <pavone@retrodev.com>
parents:
diff changeset
5
db5c7047ef0e Initial commit
Mike Pavone <pavone@retrodev.com>
parents:
diff changeset
6 start_link() ->
db5c7047ef0e Initial commit
Mike Pavone <pavone@retrodev.com>
parents:
diff changeset
7 supervisor:start_link(awesupp, []).
db5c7047ef0e Initial commit
Mike Pavone <pavone@retrodev.com>
parents:
diff changeset
8
db5c7047ef0e Initial commit
Mike Pavone <pavone@retrodev.com>
parents:
diff changeset
9 init(_Args) ->
db5c7047ef0e Initial commit
Mike Pavone <pavone@retrodev.com>
parents:
diff changeset
10 {ok, {
db5c7047ef0e Initial commit
Mike Pavone <pavone@retrodev.com>
parents:
diff changeset
11 {one_for_one, 1, 60},
db5c7047ef0e Initial commit
Mike Pavone <pavone@retrodev.com>
parents:
diff changeset
12 [
db5c7047ef0e Initial commit
Mike Pavone <pavone@retrodev.com>
parents:
diff changeset
13 {awelistener, {awelistener, start_link, []}, permanent, 5000, worker, [awelistener]}
db5c7047ef0e Initial commit
Mike Pavone <pavone@retrodev.com>
parents:
diff changeset
14 ]}
db5c7047ef0e Initial commit
Mike Pavone <pavone@retrodev.com>
parents:
diff changeset
15 }.
db5c7047ef0e Initial commit
Mike Pavone <pavone@retrodev.com>
parents:
diff changeset
16