anchor.diff:      case select_focus(Module, Args0) of
           {ok, Sel} ->
               Args1 = Args0#args{focus_sel=Sel},
  -            case pre_cond_check(Module, Args1) of
  +            case check_pre_cond(Module, Args1) of
                   ok -> 
                       Selective=selective(Module),
  -                    wrangler_gen_refac_server:add_value({self(), Selective}),
  +                    wrangler_gen_refac_server:set_flag({self(), Selective}),
                       Args2 = Args1#args{selective=Selective},
                       case Selective of 
                           true ->
                               case apply(Module, transform, [Args2]) of
  -                                {change_sets, Cands} ->
  -                                    {change_sets, Cands, Module, Args2};
                                   {error, Reason} ->
  -                                    {error, Reason}
  +                                    {error, Reason};
  +                                _ ->
  +                                    {ok, ChangeSets}=wrangler_gen_refac_server:get_change_set(self()),     
  +                                    %% wrangler_gen_refac_server:delete_change_set(self()),
  +                                    {change_set, ChangeSets, Module, Args2}
                               end;
                           false->
                               case apply(Module, transform, [Args2]) of
                                 {ok, Res} ->
  -                                    wrangler_gen_refac_server:delete_value(self()),
  +                                    wrangler_gen_refac_server:delete_flag(self()),
                                       refac_write_file:write_refactored_files(Res,emacs,TabWidth,"");
                                   {error, Reason} ->
  -                                    wrangler_gen_refac_server:delete_value(self()),
  +                                    wrangler_gen_refac_server:delete_flag(self()),
                                       {error, Reason}
                               end
                       end;
  
positive.code: %%   `{error, Reason}' if the user didn't select the kind of entity 
  %%   expected; or `{ok, term()' when a valid focus of interest has been
  %%   selected.
  %%  ```pre_cond_check(Args::#args{})
  %%       ===> ok | {error, Reason}'''
  %%   This function checks whether the pre-conditions of the refactoring 
  %%   hold, and returns `ok' if the pre-condition checking passes, otherwise
  
negative.code: %% to all refactorings.
  %%  
  %% The user module should export:
  %% ```input_par_prompts() 
  %%      ===> [string()]'''
  %%  `input_par_prompts' returns the list of prompt strings to be used when 
  %%   the refactorer asks the user for input. There should be one 
  %%   prompt string for each input.
  %% ```select_focus(Args::#args{}) 
  