anchor.diff:  
   get_inmost_enclosing_body_expr(Form, Expr) ->
       ExprPos = refac_syntax:get_pos(Expr),
  +    refac_io:format("ExprPos:\n~p\n", [ExprPos]),
       Fun = fun (Node, S) ->
   		  Type =  refac_syntax:type(Node),
   		  case lists:member(Type, [clause, block_expr, try_expr]) of
  
positive.code: 					 refac_syntax:try_expr_body(Node)
  				 end,
  			  {Start, _End} = refac_misc:get_range(hd(Body)),
  			  {_, End} = refac_misc:get_range(lists:last(Body)),
  			  case Start =< ExprPos andalso ExprPos =< End of
  			      true ->
  				  EnclosingExpr = get_enclosing_expr(Body, Expr),
  
negative.code: 		  {Start, End} = refac_misc:get_start_end_loc(ExprStatement),
  		  case Start =< ExprPos andalso ExprPos =< End of
  		    true ->
  			  {ExprStatement1, _}= replace_expr_with_var(Expr, NewVarName,
  								     ExprStatement),
  			  [MatchExpr, ExprStatement1];
  		    false ->
  			[ExprStatement]
  		  end
  