[erlang-questions] Supervisor Linked to Shell

[David N Murray]

figured it out:


  -module(t).
  -behavior(supervisor).
  -export([start/0, init/1]).

  start() ->
-     supervisor:start_link(?MODULE, []).
+     supervisor:start_link(?MODULE, self()).

- init(_) ->
+ init(ShellPid) ->
+     unlink(ShellPid),
      {ok, {{one_for_one, 3, 3600}, []}}.


Note to self:  Search the archives first.

Dave