 
 In either case the mark gets the face
 `svn-status-update-available-face', and will only be visible if
-`\[svn-status-update]' is run with a prefix argument")
+`\\[svn-status-update]' is run with a prefix argument")
 
 ;;; default arguments to pass to svn commands
 (defvar svn-status-default-log-arguments ""

          (setq arglist (append arglist
                                (split-string
                                 (read-from-minibuffer
                                  (format "Run `svn %s %s' with extra arguments: "
                                          cmdtype (mapconcat 'identity arglist " "))))))
          (when (eq svn-status-edit-svn-command t)
            (svn-status-toggle-edit-cmd-flag t))
          (message "svn-run-svn %s: %S" cmdtype arglist))

    ;;The next `or' is because (file-name-directory "file") returns nil
    (or (file-name-directory (svn-status-line-info->filename line-info))
        ".")))

(defun svn-status-set-user-mark (arg)
  "Set a user mark on the current file or directory.
