         (rev-arg (concat lower-rev ":" upper-rev)))
     (when arg
       (setq rev-arg (read-string "Revision for changeset: " rev-arg)))
-    (svn-run-svn nil t 'diff "diff" (concat "-r" rev-arg))
+    (svn-run nil t 'diff "diff" (concat "-r" rev-arg))
     (svn-status-activate-diff-mode)))
 
 (defun svn-log-edit-log-entry ()

          (message "Not moving %s (try committing it first)" original-name))

         ((eq original-filemarks 32) ;;original is unmodified: can use `svn mv'
          (svn-run-svn nil t 'mv "mv" "--" original-name dest))

         ;;file is conflicted in some way?
         (t
          (if (yes-or-no-p (format "The status of %s looks scary.  Risk moving it anyway? " original-name))
              (svn-run-svn nil t 'mv "mv" "--" original-name dest)
            (message "Not moving %s" original-name))))))
        (svn-status-update)))


                        (arg         '("-v"))
                        (t           svn-status-default-log-arguments))))
    (svn-status-create-arg-file svn-status-temp-arg-file "" (svn-status-marked-files) "")
    (svn-run t t 'log "log" "--targets" svn-status-temp-arg-file switches)
    (save-excursion
      (set-buffer "*svn-process*")
      (svn-log-view-mode))))
