anchor.diff:  		 end,
   	    Node1 =rewrite(Node, refac_syntax:clause(P1, G1, Body1)),
   	    {Node1, true};
  +	application ->
  +	    Op = refac_syntax:application_operator(Node),
  +	    Args = refac_syntax:application_arguments(Node),
  +	    Op1 = add_category(Op, C),
  +	    Op2 = refac_util:update_ann(Op1,{category, application_op}),
  +	    Args1 = add_category(Args, C),
  +	    Node1 = rewrite(Node, refac_syntax:application(Op2, Args1)),
  +	    {refac_syntax:add_ann({category, C}, Node1), true};
   	match_expr ->
   	    P = refac_syntax:match_expr_pattern(Node),
   	    B = refac_syntax:match_expr_body(Node),
  
positive.code:     {_S2,E2} = get_range(Field),
      refac_syntax:add_ann({range,{S1,E2}},Node).
  
  get_range(Node) ->
       As = refac_syntax:get_ann(Node),
       case lists:keysearch(range, 1, As) of
  
negative.code: 	case_expr ->
  	    A = refac_syntax:case_expr_argument(Node),
  	    Lc = refac_util:glast("refac_util:do_add_range,case_expr", refac_syntax:case_expr_clauses(Node)),
  	    calc_and_add_range_to_node_1(Node, Toks, A, Lc, 'case', 'end');
  	clause ->
  	    P = refac_syntax:get_pos(Node),
  	    Body = refac_util:glast("refac_util:do_add_range, clause", refac_syntax:clause_body(Node)),
  