anchor.diff:      do_recover_backups(Fs, PreviewPairs, RecoveredFiles);
   do_recover_backups([{{FileName, NewFileName, false}, Content}|Fs], PreviewPairs, RecoveredFiles) ->
       SwpFileName = filename:join([filename:rootname(FileName) ++ ".erl.swp"]),
  -    Res=case filelib:is_regular(SwpFileName) of 
  -            true -> 
  +    Res=case filelib:is_regular(SwpFileName) of
  +            true ->
                   ok;
               _ ->
  -                file:copy(NewFileName, SwpFileName) 
  +                file:copy(NewFileName, SwpFileName)
           end,
       %% make sure only the oldest version is copied to the file.
  -    NewRecoveredFiles=case lists:member(FileName, RecoveredFiles) of 
  +    NewRecoveredFiles=case lists:member(FileName, RecoveredFiles) of
                             true ->
                                 RecoveredFiles;
                             false ->
  
positive.code:                               end
                        end, PreviewPairs)
      end.
     
  %%-------------------------------------------------------------------
  %% Function: handle_info(Info, State) -> {noreply, State} |
  %%                                       {noreply, State, Timeout} |
  
negative.code:     if FileName /= NewFileName -> file:delete(NewFileName);
         true -> ok
      end,
      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),
  