anchor.diff:      if FileName /= NewFileName -> file:delete(NewFileName);
          true -> ok
       end,
  -    do_recover_backups(Fs, NewPreviewPairs, NewRecoveredFiles);  
  +    do_recover_backups(Fs, NewPreviewPairs, NewRecoveredFiles);
   do_recover_backups([{{FileName, NewFileName, true}, _Content}|Fs], PreviewPairs,RecoveredFiles) ->
       SwpFileName = filename:join([filename:rootname(FileName) ++ ".erl.swp"]),
       file:copy(NewFileName, SwpFileName),
  
positive.code: 
  %% API
  -export([start_backup_server/0,
           add_to_backups/1, 
           add_atomic_cr_start_point/1,
           recover_backups/0,
           rollback_atomic_cr/1,
  
negative.code:                               end
                        end, PreviewPairs)
      end.
  
  %%-------------------------------------------------------------------
  %% Function: handle_info(Info, State) -> {noreply, State} |
  %%                                       {noreply, State, Timeout} |
  