   (define-key svn-status-mode-map (kbd "O") svn-status-mode-options-map))
 (when (not svn-status-mode-trac-map)
   (setq svn-status-mode-trac-map (make-sparse-keymap))
+  (define-key svn-status-mode-trac-map (kbd "w") 'svn-trac-browse-wiki)
   (define-key svn-status-mode-trac-map (kbd "t") 'svn-trac-browse-timeline)
+  (define-key svn-status-mode-trac-map (kbd "m") 'svn-trac-browse-roadmap)
+  (define-key svn-status-mode-trac-map (kbd "r") 'svn-trac-browse-report)
+  (define-key svn-status-mode-trac-map (kbd "s") 'svn-trac-browse-source)
+  (define-key svn-status-mode-trac-map (kbd "i") 'svn-trac-browse-ticket)
+  (define-key svn-status-mode-trac-map (kbd "c") 'svn-trac-browse-changeset)
   (define-key svn-status-mode-map (kbd "T") svn-status-mode-trac-map))
 (when (not svn-status-mode-branch-map)
   (setq svn-status-mode-branch-map (make-sparse-keymap))

;; --------------------------------------------------------------------------------
;; svn status trac integration
;; --------------------------------------------------------------------------------
(defun svn-trac-browse-timeline ()
  "Open the trac timeline view for the current svn repository."
  (interactive)
  (unless svn-trac-project-root
    (svn-status-set-trac-project-root))
  (svn-browse-url (concat svn-trac-project-root "timeline")))

(defun svn-trac-browse-changeset (changeset-nr)
  "Show a changeset in the trac issue tracker."

      :style toggle :selected svn-status-display-full-path]
     )
    ("Trac"
     ["Browse wiki" svn-trac-browse-wiki t]
     ["Browse timeline" svn-trac-browse-timeline t]
     ["Browse roadmap" svn-trac-browse-roadmap t]
     ["Browse source" svn-trac-browse-source t]
     ["Browse report" svn-trac-browse-report t]
     ["Browse ticket" svn-trac-browse-ticket t]
     ["Browse changeset" svn-trac-browse-changeset t]
     ["Set Trac project root" svn-status-set-trac-project-root t]
     )
    "---"
