anchor.diff:  %%--------------------------------------------------------------------
   -export([
   	 start_link/1,
  -	 start_extras/2,
  -	 start_transportlayer/1
  +	 start_extras/3,
  +	 start_transportlayer/1,
  +	 get_pids/0
   	]).
   
   %%--------------------------------------------------------------------
  
positive.code:     MyList = [Logger, Directory, TransactionLayer],
      {ok, {{one_for_one, 20, 60}, MyList}}.
  
  start_extras(Supervisor, AppSupdata) ->
      UserDb = sipuserdb:yxa_init(),
      MyList = UserDb,
      SupList = case AppSupdata of
  		  {append, AppList} when is_list(AppList) ->
  		      lists:append(MyList, AppList);
  
negative.code: 		      permanent, 2000, supervisor, [transportlayer]},
      my_start_children(Supervisor, [TransportLayer]).
  
  
  %%====================================================================
  %% Internal functions
  %%====================================================================
  
  %% tell Supervisor to start a list of children, one by one.
  my_start_children(Supervisor, []) ->
      {ok, Supervisor};
  my_start_children(Supervisor, [H|T]) ->
  