       (svn-run-svn t t 'log "log" "--targets" svn-status-temp-arg-file))
     (save-excursion
       (set-buffer "*svn-process*")
-      (log-view-mode))))
+      (svn-log-view-mode))))
 
 (defun svn-status-info ()
   "Run `svn info' on all selected files.

  "Strip the version info from a psvn revision file name."
  (string-match "\\(.+\\)\\.~.+~" name)
  (or (match-string-no-properties 1 name) name))

(defun svn-revision-normal-mode ()
  "Run normal-mode in a svn revision file."
  (interactive)
  (flet ((file-name-sans-versions
          (name &optional keep-backup-version)
          (svn-status-file-name-sans-versions name keep-backup-version)))
    (normal-mode)))


(condition-case nil
    ;;(easy-menu-add-item nil '("tools") ["SVN Status" svn-status t] "PCL-CVS")

  (if svn-xemacsp
      (require 'overlay)
    (require 'overlay nil t)))

;; Use the normally used mode for files ending in .~HEAD~, .~BASE~, ...
(add-to-list 'auto-mode-alist '("\\.~?\\(HEAD\\|BASE\\|PREV\\)~?\\'" ignore t))

;;; internal variables
(defvar svn-process-cmd nil)
