anchor.diff:      Kids = [Openid, Session, Data | OtherModules1],
   
       {ok, { {one_for_one, 5, 10}, Kids} }.
  -
  -%% -------------------------------------------------------------------
  -
  -make_cache_args(Args) ->
  -    {boss_cache, {boss_cache, start, [Args]}, permanent, 5000, worker, [boss_cache]}.
  -
  -%% -------------------------------------------------------------------
  -
  -make_webmachine_args(Args) ->
  -    {ok, Dispatch} = file:consult(filename:join(code:priv_dir(rpg_battlemap), "dispatch.conf")),
  -    WebmachineDefaults = [
  -        {log_dir, "priv/log"},
  -        {ip, "0.0.0.0"},
  -        {port, 9090}
  -    ],
  -    Webmachine = proplists:get_value(webmachine, Args, []),
  -    WebmachineArgs = override_defaults(WebmachineDefaults, Webmachine),
  -    StartArgs = [{dispatch, Dispatch} | WebmachineArgs],
  -    {webmachine_mochiweb, {webmachine_mochiweb, start,
  -        [StartArgs]}, permanent, 5000, worker, [webmachine_mochiweb]}.
  -
  -%% -------------------------------------------------------------------
  -
  -make_boss_db_args(Args) ->
  -    BossArgs = proplists:get_value(boss_db, Args, []),
  -    {boss_db, {boss_db, start, [BossArgs]}, permanent, 5000, worker, [boss_db]}.
  -
  -%% -------------------------------------------------------------------
  -
  -override_defaults(Defaults, Args) ->
  -    override_defaults(Defaults, Args, []).
  -
  -override_defaults([], _Args, Acc) ->
  -    Acc;
  -
  -override_defaults([{Key, Value} = H | Tail], Args, Acc) ->
  -    Acc0 = case proplists:get_value(Key, Args) of
  -        undefined ->
  -            [H | Acc];
  -        Value ->
  -            [H | Acc];
  -        Else ->
  -            [{Key, Else} | Acc]
  -    end,
  -    override_defaults(Tail, Args, Acc0).
  
positive.code: 
  start_link(Args) ->
          ssl:start(),
          cowboy:start(),
          supervisor:start_link({local, ?MODULE}, ?MODULE, Args).
  
  %% ===================================================================
  
negative.code:     Session = {rpgb_session, {rpgb_session, start_link, []}, permanent,
          5000, worker, [rpgb_session]},
  
      DataSetup = proplists:get_value(data_callback, Args),
      Data = {rpgb_data, {rpgb_data, start_link, [DataSetup]}, permanent,
          5000, worker, [rpgb_data]},
  