anchor.diff:  	     {error, string()} | {ok, string()}).
   rename_var(Fname, Line, Col, NewName, SearchPaths) ->
       case check_undo_process() of
  -	ok -> Res=wrangler:rename_var(Fname, Line, Col, NewName, SearchPaths),
  +	ok ->
  +	    Res=wrangler:rename_var(Fname, Line, Col, NewName, SearchPaths),
  +	    case Res of 
  +		{ok, _} ->
  +		    check_wrangler_error_logger();
  +		{error, _} -> ok
  +	    end,
  +	    Res;		
  +	{error, Reason} ->
  +	    {error, Reason}
  +    end.
  +
  +-spec(rename_fun/5::(string(), integer(), integer(), string(), [dir()]) ->
  +	     {error, string()} | {ok, [filename()]}).
  +rename_fun(Fname, Line, Col, NewName,SearchPaths) ->
  +    case check_undo_process() of
  +	ok -> wrangler:rename_fun(Fname, Line, Col, NewName,SearchPaths);
  +	{error, Reason} ->
  +	   {error, Reason}
  +    end.
  +
  +-spec(rename_mod/3::(filename(), string(), [dir()]) -> {error, string()} | {ok, [filename()]}).	  
  +rename_mod(Fname, NewName,SearchPaths) ->
  +    case check_undo_process() of 
  +	ok ->  wrangler:rename_mod(Fname, NewName,SearchPaths);
  +	{error, Reason} ->
  +	    {error, Reason}
  +    end.
  +
  +-spec(rename_process/5::(filename(), integer(), integer(), string(), [dir()]) ->
  +	     {error, string()} | {undecidables, string()}| {ok, [filename()]}).
  +rename_process(Fname, Line, Col, NewName, SearchPaths) ->
  +    case check_undo_process() of
  +	ok -> Res=wrangler:rename_process(Fname, Line, Col, NewName, SearchPaths),
   	      case Res of 
   		  {ok, _} ->
   		      check_wrangler_error_logger();
  -		  {error, _} -> ok
  +		  _ -> ok
   	      end,
   	      Res;		
  -	{error, Reason} ->
  -	    {error, Reason}
  -    end.
  -
  --spec(rename_fun/5::(string(), integer(), integer(), string(), [dir()]) ->
  -	     {error, string()} | {ok, [filename()]}).
  -rename_fun(Fname, Line, Col, NewName,SearchPaths) ->
  -    case check_undo_process() of
  -	ok -> wrangler:rename_fun(Fname, Line, Col, NewName,SearchPaths);
  -	{error, Reason} ->
  -	   {error, Reason}
  -    end.
  -
  --spec(rename_mod/3::(filename(), string(), [dir()]) -> {error, string()} | {ok, [filename()]}).	  
  -rename_mod(Fname, NewName,SearchPaths) ->
  -    case check_undo_process() of 
  -	ok ->  wrangler:rename_mod(Fname, NewName,SearchPaths);
   	{error, Reason} ->
   	    {error, Reason}
       end.
  
positive.code:     end.
  
  -spec(fun_to_process/5::(filename(), integer(), integer(), string(), [dir()])->
  	     {error, string()} | {ok, [filename()]}).
  fun_to_process(Fname, Line, Col, ProcessName,SearchPaths) ->
      case check_undo_process() of
  	ok -> wrangler:fun_to_process(Fname, Line, Col, ProcessName,SearchPaths);
  	{error, Reason} ->
  	   {error, Reason}
      end.
  %% tuple_to_record(Fname, StartLine, StartCol, EndLine, EndCol) ->
  %%     refac_record:tuple_to_record(Fname, {StartLine, StartCol}, {EndLine, EndCol}).
  
  
  check_undo_process() ->
  
negative.code: 	    ok
      end.
  
  check_wrangler_error_logger() -> wrangler_error_logger:check_logged_errors().
      
  