Updated references from old to new module names.

[cellular-automata.git] / 001 / src / life_god.erl

diff --git a/001/src/life_god.erl b/001/src/life_god.erl
index 3922680..d9f6237 100644 (file)
--- a/001/src/life_god.erl
+++ b/001/src/life_god.erl
@@ -1,4 +1,4 @@
--module(god).
+-module(life_god).
 -behaviour(supervisor).
 
 
@@ -29,13 +29,13 @@ init([X, CellData]) ->
     CellNames = [Name || {_, Name, _} <- CellData],
     RestartStrategy = {one_for_one, 5, 10},
     Cells = [spec_cell(Datum) || Datum <- CellData],
-    Time = ?CHILD(worker, time, [X, CellNames]),
+    Time = ?CHILD(worker, life_time, [X, CellNames]),
     Children = Cells ++ [Time],
     {ok, {RestartStrategy, Children}}.
 
 
 spec_cell({_, Name, _}=Datum) ->
-    M = cell,
+    M = life_cell,
     F = start_link,
     A = [Datum],
     {Name, {M, F, A}, permanent, 5000, worker, [M]}.