 ;; Copyright (C) 2002 by Stefan Reichoer
 
 ;; Author: Stefan Reichoer, <reichoer@web.de>
-;; Version: 0.2a
+;; Version: 0.2b
 
 ;; $LastChangedDate: 2002-09-02 21:50:21 +0200 (Mo, 02 Sep 2002) $
 

                                               ;;file-svn-info
          (next-line 1)))))

(easy-menu-add-item nil '("tools") ["SVN Status" svn-status t] "PCL-CVS")

(defvar svn-status-mode-map () "Keymap used in svn-status-mode buffers.")
(defvar svn-status-mode-property-map ()

          (setq svn-file-mark (string-to-char (car file-svn-info)))
          (setq svn-property-mark (string-to-char (substring (car file-svn-info) 1)))
          (when (eq svn-property-mark 0) (setq svn-property-mark nil))
          ;is this necessary?
          (when (eq svn-property-mark ?\ ) (setq svn-property-mark nil))
          (cond ((eq svn-file-mark ??)
                 (setq path (nth 1 file-svn-info)
                       local-rev -1
