                     ["Work Directory History..." svn-status-use-history t]
                     ["Mark" svn-status-set-user-mark t]
                     ["Unmark" svn-status-unset-user-mark t]
+                    ["Unmark all" svn-status-unset-all-usermarks t]
                     ["Hide Unknown" svn-status-toggle-hide-unknown
                      :style toggle :selected svn-status-hide-unknown]
                     ["Hide Unmodified" svn-status-toggle-hide-unmodified

;;; Code:

; user setable variables
(defvar svn-status-hide-unknown nil "Hide unknown files in *svn-status* buffer.")
(defvar svn-status-hide-unmodified nil "Hide unmodified files in *svn-status* buffer.")
(defvar svn-status-directory-history nil "List of visited svn working directories.")


(defun svn-status-show-svn-diff (arg)
  (interactive "P")
  (let ((fl (list (svn-status-get-line-information))) ;; was: (svn-status-marked-files))
        (clear-buf t)
        (revision (if arg (svn-status-read-revision-string "Diff with files for version: " "PREV") "BASE")))
    (while fl
