   "If point is on a directory, run `svn-status' on that directory.
 Otherwise run `find-file'."
   (interactive)
+  (svn-status-ensure-cursor-on-file)
   (let ((line-info (svn-status-get-line-information)))
     (if (svn-status-line-info->directory-p line-info)
         (svn-status (svn-status-line-info->full-path line-info))

(defun svn-status-find-file-other-window ()
  "Open the file in the other window for editing."
  (interactive)
  (find-file-other-window (svn-status-line-info->filename
                           (svn-status-get-line-information))))

(defun svn-status-view-file-other-window ()
  "Open the file in the other window for viewing."
  (interactive)
  (view-file-other-window (svn-status-line-info->filename
                           (svn-status-get-line-information))))


compare the working copy with BASE.
If ARG then prompt for revision to diff against."
  (interactive "P")
  (svn-status-ensure-cursor-on-file)
  (svn-status-show-svn-diff-internal arg nil))

(defun svn-status-show-svn-diff-for-marked-files (arg)
