 				'local-map keymap)))
 		 str))
   str)
+
+; compatibility
+; emacs 20
+(unless (fboundp 'point-at-eol) (defalias 'point-at-eol 'line-end-position))
+(unless (fboundp 'point-at-bol) (defalias 'point-at-bol 'line-beginning-position))
 
 
 (defun svn-status (dir &optional arg)

                ((eq svn-process-cmd 'propdel)
                 (svn-status-update))))
      ;;(message (format "SVN Error: :%s:" event))
      (svn-status-show-process-buffer t)))

(defun svn-parse-status-result ()
  (setq svn-status-head-revision nil)

(defvar svn-status-hide-unmodified nil "Hide unmodified files in *cvs-status* buffer.")
(defvar svn-status-directory-history nil "List of visited svn working directories.")

(require 'overlay nil t)

;; internal variables
(defvar svn-process-cmd nil)
