   (if (= (process-exit-status proc) 0)
       (with-current-buffer (process-buffer proc)
         (let ((inhibit-read-only t))
-          (svn-run 'status-v (cons "-N" svn-reverted-files)))))
+          (svn-run-status-v svn-reverted-files nil))))
   (mapc #'svn-revert-if-needed svn-reverted-files))
 
 (defun svn-resolve ()

  (svn-foreach-svn-buffer
   (buffer-file-name)
   (lambda (local-file-name file-pos)
     (svn-refresh-one local-file-name))))

;;; To get reasonable uniquify behaviour, tell it what path to use
;;; for the status buffers.

  (let ((proc (svn-run 'info ())))
    (while (eq (process-status proc) 'run)
      (accept-process-output proc 2 10000)))
  (svn-refresh)
  (message
   (substitute-command-keys
    "Welcome to dsvn. Press \\[svn-status-help] for keyboard help summary.")))

(defun svn-refresh (&optional clear)
  "Run `svn status'.
