anchor.diff:  
   %% Start main window process
   -spec start(options()) -> {ok, window_pid()} | {error, reason()}.
  -start(Options)when is_list(Options)  ->
  +start(Options) when is_list(Options) ->
       case start_link(Options) of
  -	{ok, WinPid} ->
  +	{ok, WinPid} = OK ->
   	    unlink(WinPid),
  -	    {ok, WinPid};
  -	Other->
  -	    Other
  +	    OK;
  +	{error, _Reason} = Error ->
  +	    Error
       end.
   
   %% Start main window process with wx debugging enabled
  --spec debug() ->  {ok, window_pid()} | {error, reason()}.
  +-spec debug() -> {ok, window_pid()} | {error, reason()}.
   debug() ->
       start([{wx_debug, 2}]).
   
   %% Start main window process with options
  --spec start_link(options()) -> {ok, window_pid() | {error, reason()}}.
  +-spec start_link(options()) -> {ok, window_pid()} | {error, reason()}.
   start_link(Options) when is_list(Options) ->
       case reltool_sys_win:start_link(Options) of
  -        {ok, WinPid} ->
  -            {ok, WinPid};
  +        {ok, _WinPid} = OK ->
  +            OK;
           {error, Reason} ->
               {error, lists:flatten(io_lib:format("~p", [Reason]))}
       end.
  
positive.code: 	{ok, Warnings} ->
  	    [io:format("~p: ~s\n", [?APPLICATION, W]) || W <- Warnings],
  	    apply_fun(Pid, false, Fun);
  	{error, Reason} ->
  	    stop(Pid),
  	    {error, Reason}
      end.
  
  %% Get status about the configuration
  -type warning() :: string().
  -spec get_status(server()) ->
  			{ok, [warning()]} | {error, reason()}.
  get_status(PidOrOptions)
    when is_pid(PidOrOptions); is_list(PidOrOptions) ->
      eval_server(PidOrOptions, false,
  		fun(Pid) ->
  			reltool_server:get_status(Pid)
  		end).
  
  %% Get reltool configuration
  -spec get_config(server()) -> {ok, config()} | {error, reason()}.
  
negative.code:     Res = case start_server(Options) of
  	      {ok, Pid} ->
  		  apply_fun(Pid, DisplayWarnings, Fun);
  	      {error, _Reason} = Error ->
  		  Error
  	  end,
      process_flag(trap_exit, TrapExit),
      Res.
  