anchor.diff:      F = refac_util:concat_toks(refac_util:get_toks(Form)),
       {ok,EToks,_} = refac_scan:string(E),
       {ok,FToks,_} = refac_scan:string(F),
  -    EStr = process_str(refac_util:concat_toks(EToks)),
  -    FStr = process_str(refac_util:concat_toks(FToks)),
  +    EStr = refac_util:concat_toks(EToks),
  +    FStr = refac_util:concat_toks(FToks),
       Acc1 = case Acc of
   	     "" -> Acc;
   	     _ ->
  
positive.code: 	  D1 = lay(erl_syntax:record_field_name(Node),Ctxt1),
  	  case erl_syntax:record_field_value(Node) of
  	    none -> D1;
  	     V -> D2 = floating(text("=")),lay(V,Ctxt1),
  		  D1EndLn = get_end_line(erl_syntax:record_field_name(Node)),
  		  D2StartLn = get_start_line(V),
  		  case (D2StartLn-D1EndLn==0) and (D1EndLn=/=0) of
  		      true -> beside(D1, D2);
  		      _ -> par([D1,D2],Ctxt1#ctxt.break_indent)
  		  end
  	  end;
        record_index_expr ->  %% done
  
negative.code:       _ -> vertical_concat(T,Acc1 ++ Str)
      end.
  
  get_paper_ribbon_width(Form) ->
       case refac_syntax:type(Form) of
   	attribute -> {?PAPER, ?RIBBON};
   	_ ->
   	    Fun = fun(T,Acc) ->
   			   {S, E} = refac_util:get_range(T),
   			   [S,E]++ Acc
   		   end,
   	     AllRanges =refac_syntax_lib:fold(Fun, [], Form),
   	     case AllRanges of
   		 [] -> {?PAPER, ?RIBBON};
   		 _ ->  {Start,End} = refac_util:get_range(Form),
   		       GroupedRanges = group_by(1, (lists:filter(fun(Loc) ->
   									 (Loc>= Start) and (Loc=<End) end, AllRanges))),
   		       MinMaxCols=lists:map(fun(Rs) ->Cols = lists:map(fun({_Ln, Col}) -> Col end, Rs),
   						      case Cols of
   							  [] -> {1, 80};
   							  _ -> {lists:min(Cols),lists:max(Cols)}
   						      end
   					    end,  GroupedRanges),
   		       Paper = lists:max(lists:map(fun({_Min, Max}) ->
   							   Max end, MinMaxCols)),
   		       Ribbon = lists:max(lists:map(fun({Min, Max}) ->
   							    Max-Min+1 end, MinMaxCols)),
   		       Paper1 = case Paper < ?PAPER of
   				    true -> ?PAPER;
   				    _ -> Paper
   				end,
   		       Ribbon1 = case Ribbon < ?RIBBON of
   				     true -> ?RIBBON;
   				     _  -> Ribbon
   				 end,	
  		       {Paper1+5, Ribbon1+5}  %% adjustion to take the ending tokens such as brackets/commas into account.
   	     end
       end.
  
  group_by(N,TupleList) ->
      SortedTupleList = lists:keysort(N,TupleList),
  