anchor.diff:  	  Es = seq(erl_syntax:list_comp_body(Node),floating(text(",")),Ctxt1,fun lay/2),
   	  D2 = lay_elems(fun refac_prettypr_0:par/1, Es, erl_syntax:list_comp_body(Node)),
   	  D1EndLn = get_end_line(erl_syntax:list_comp_template(Node)),
  -	  D2StartLn = get_start_line(erl_syntax:list_comp_body(Node)),
  +	  D2StartLn = get_start_line(hd(erl_syntax:list_comp_body(Node))),
   	  D3 =  case (D2StartLn-D1EndLn==0) and (D1EndLn=/=0) of
   		    true -> beside(D1, beside(floating(text(" || ")),beside(D2,floating(text("]")))));
   		    _ ->  par([D1,beside(floating(text("|| ")),beside(D2,floating(text("]"))))])
  
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: append_clause_body(B,D,S,Ctxt, SameLine) ->
      case SameLine of 
  	true -> beside(beside(D,S), nest(Ctxt#ctxt.break_indent,B));
  	_ ->  above(beside(D,S),nest(Ctxt#ctxt.break_indent,B))
      end.
  
  append_guard(none,D,_) -> D;
  