   (define-key svn-log-view-mode-map (kbd "p") 'svn-log-view-prev)
   (define-key svn-log-view-mode-map (kbd "n") 'svn-log-view-next)
   (define-key svn-log-view-mode-map (kbd "=") 'svn-log-view-diff)
+  (define-key svn-log-view-mode-map (kbd "e") 'svn-log-edit-log-entry)
   (define-key svn-log-view-mode-map (kbd "q") 'bury-buffer))
+
 (easy-menu-define svn-log-view-mode-menu svn-log-view-mode-map
 "'svn-log-view-mode' menu"
                   '("SVN-LogView"
-                    ["Show Changeset" svn-log-view-diff t]))
+                    ["Show Changeset" svn-log-view-diff t]
+                    ["Edit log message" svn-log-edit-log-entry t]))
 
 (defvar svn-log-view-font-lock-keywords
   '(("^r.+" . font-lock-keyword-face)

      (diff-mode)
      (font-lock-fontify-buffer))))

;; --------------------------------------------------------------------------------
;; svn status persistent options
;; --------------------------------------------------------------------------------

  (easy-menu-add svn-log-edit-mode-menu)
  (setq major-mode 'svn-log-edit-mode)
  (setq mode-name "svn-log-edit")
  (setq svn-log-edit-update-log-entry nil)
  (run-hooks 'svn-log-edit-mode-hook))

(defun svn-log-edit-abort ()
