                  ((eq svn-process-cmd 'propdel)
                   (svn-status-update))))
           ((string= event "killed\n")
-           (message "Svn process killed"))
+           (message "svn process killed"))
           (t
-           (message "svn-process had unknown event: %s" event))
+           (message "svn process had unknown event: %s" event))
           ;;(message (format "SVN Error: :%s:" event))
           (svn-status-show-process-buffer-internal t))))
 

    (svn-status-goto-file-name ".")))

(defun svn-status-next-line (nr-of-lines)
  (next-line nr-of-lines)
  (goto-char (+ (point-at-bol) svn-status-default-column)))

(defun svn-status-update (&optional arg)
  (interactive "P")

     ["Set svn:keywords List" svn-status-property-set-keyword-list t]
     )
    "---"
    ["Edit Next SVN Cmd Line" svn-status-toggle-edit-cmd-flag t]
    ["Work Directory History..." svn-status-use-history t]
    ["Mark" svn-status-set-user-mark t]
    ["Unmark" svn-status-unset-user-mark t]
