anchor.diff:  		string ->
   		    refac_syntax:default_literals_vars(Node, '%');
   		atom -> case refac_sim_expr_search:variable_replaceable(Node) of
  -			    true ->refac_syntax:default_literals_vars(Node, '%') ;
  +			    true -> 
  +				refac_io:format("Node:\n~p\n", [Node]),
  +				As = refac_syntax:get_ann(Node), 
  +				case lists:keysearch(type,1, As) of 
  +				    {value, _} -> 
  +					refac_syntax:default_literals_vars(
  +					  Node, refac_syntax:atom_value(Node));
  +				    false ->
  +					refac_syntax:default_literals_vars(Node, '%') 
  +				end;					
   			    _ -> refac_syntax:default_literals_vars(
   				   Node, refac_syntax:atom_value(Node))
   			end;
  
positive.code: 	    {ok, [SE||{_File, SE} <-Res]};	
  	_   -> {error, "You have not selected an expression!"}
      end.     
  
  %% Search the clones of an expression from Tree.
  search_one_expr(FileName, Tree, Exp) ->
  
negative.code:     Res1 =[{FileName, SE}| Res -- [{FileName, SE}]],
      display_search_result(Res1).
  
  
  -spec(expr_search_eclipse/4::(filename(), pos(), pos(), integer()) ->
     {ok, [{{integer(), integer()}, {integer(), integer()}}]} | {error, string()}).
  