anchor.diff:      receive 
           {From, get_next_command, PrevResult} ->
               NewState=update_state(State, PrevResult),
  -            wrangler_io:format("ChangedFiles:\n~p\n", [sets:to_list(NewState#state.changed_files)]),
  +            %%wrangler_io:format("ChangedFiles:\n~p\n", [sets:to_list(NewState#state.changed_files)]),
               case Mode of  
                   interactive ->
                       Question =apply(wrangler_gen, gen_question, [RefacName, Args]),
  
positive.code:                     Pid = process_one_cr(Parent, false, Mode, CR1),
                      From ! {get_next_command, Pid, [ok,[]]}
              end;
          {'EXIT', ChildrenPid, Reason} ->
              case Reason of 
                  normal ->
                      if_then_refac_loop(Parent, State);
                  _ ->
                      error(format_msg("~p died with:~p~n", [ChildrenPid, Reason]))
              end;
          Msg ->
              error(format_msg("Unexpected message in if_then_refac_loop:~p\n", Msg))  
  
negative.code:                     wrangler_backup_server:rollback_atomic_cr(self()),
                      From !{get_next_command, Parent, [error, Reason]};
                  _ ->
                      %%wrangler_io:format("PreResult:\n~p\n", [PrevResult]),
                      ModifiedSoFar =update_modified_files(PrevResult,Changes),
                      %%wrangler_io:format("Sofar:\n~p\n", [sets:to_list(ModifiedSoFar)]),
                      case generate_cmds(CRs) of 
                          [] -> 
                              From !{get_next_command, Parent, [ok, sets:to_list(ModifiedSoFar)]};
  