anchor.diff:  		    atom ->
   			AtomVal = refac_syntax:atom_value(T),
   			case lists:member(AtomVal, AtomNames) of
  -			    true ->
  +			    true when Type==function ->
  +				Ann = refac_syntax:get_ann(T),
  +				case lists:keysearch(fun_def, 1, Ann) of
  +				    {value, {fun_def, {'_', _, _, _, _}}} ->
  +					Acc ++[{atom, refac_syntax:get_pos(T), AtomVal}];
  +				    {value, {fun_def, {_,'_', _, _, _}}} ->
  +					Acc ++[{atom, refac_syntax:get_pos(T), AtomVal}];
  +				    {value, {fun_def, {_, _, '_', _, _}}} ->
  +					Acc ++[{atom, refac_syntax:get_pos(T), AtomVal}];
  +				    {value, _} ->
  +					Acc ++ [{function, refac_syntax:get_pos(T), AtomVal}];
  +				    false ->
  +					Acc ++[{atom, refac_syntax:get_pos(T), AtomVal}]
  +				end;
  +			    true->
   				Acc ++ [{Type, refac_syntax:get_pos(T), AtomVal}];
   			    false ->
   				Acc
  
positive.code: 	    case has_macros(Node) andalso (refac_util:get_free_vars(Node)==[]) of 
  		true ->
  		    Dir = filename:dirname(FileName),
  		    DefaultIncl1 = [".","..", "../hrl", "../incl", "../inc", "../include"],
  		    DefaultIncl2 = [filename:join(Dir, X) || X <-DefaultIncl1],
  		    NewSearchPaths= SearchPaths++DefaultIncl2,
  		    {Ms, UMs} = case refac_epp:parse_file(FileName, NewSearchPaths, [])  of 
  				    {ok, _, {Defs, Uses}} -> 
  
negative.code: 
  renamed_warn_msg(FunName) ->
      "\n=================================================================================\n"
  	"WARNING: Wrangler has renamed the uses of '"++atom_to_list(FunName)++
  	"' within the following expressions while without enough "
  	"syntactic/semantic information. Please check manually!\n".
       
  
  not_renamed_warn_msg(FunName) ->
      "\n=================================================================================\n"
  	"WARNING: Wrangler could not infer whether the uses of '" ++ atom_to_list(FunName)++ 
  	"' at the following positions refer to the function renamed, and they are not renamed."
  	" Please check manually!\n".
  
  
  