anchor.diff:  %%--------------------------------------------------------------------
   %% Function: start()
   %% Descrip.: Tell error_logger to add this handler.
  -%% Returns : {ok, Pid}       |
  -%%           {error, Reason}
  -%%           Pid    = pid()
  -%%           Reason = string()
  +%% Returns : ok | Error
  +%%           Error = term(), error_logger:add_report_handler/2 result
   %%--------------------------------------------------------------------
   start() ->
  -    error_logger:add_report_handler(?MODULE, [self()]),
  -    receive
  -	{sup_error_logger, init, Pid} ->
  -	    {ok, Pid}
  -    after
  -	1000 ->
  -	    io:format("ERROR: Supervisor error handler failed to start~n~n"),
  -	    {error, "Supervisor error handler failed to start"}
  -    end.
  -    
  +    error_logger:add_report_handler(?MODULE, [self()]).
  +
   %%====================================================================
   %% Behaviour functions - gen_event callbacks
   %%====================================================================
  
positive.code: 	    false ->
  		"no name"
  	end,
      
      ChildPid =
  	case lists:keysearch(pid, 1, ChildInfo) of
  	    {value, {pid, ChildPid1}} ->
  
negative.code: 	 {started, ChildInfo}
  	] ->
  	    Descr = describe_started_child(ChildInfo),
  	    NewStack =
  		case State#state.stack of
  		    [A, B, C, D | _] ->
  			[Descr, A, B, C, D];
  