            (mapcar 'svn-status-line-info->filename svn-status-files-to-commit)))
 
 (defun svn-log-edit-save-message ()
-  "Save the current log message to the file svn-log-edit-file-name"
+  "Save the current log message to the file `svn-log-edit-file-name'."
   (interactive)
   (write-region (point-min) (point-max) svn-log-edit-file-name))
 

      (set-buffer "*svn-process*")
      (setq svn-status-info nil)
      (goto-char (point-min))
      (while (> (- (point-at-eol) (point-at-bol)) 0)
        (if (or (looking-at "Head revision:[ ]+\\([0-9]+\\)") ;svn version < 0.29
                (looking-at "Status against revision:[ ]+\\([0-9]+\\)")); svn version >= 0.29
            (setq svn-status-head-revision (match-string 1))
          (setq svn-marks (buffer-substring (point) (+ (point) 8))
                svn-file-mark (elt svn-marks 0) ; 1st column
                svn-property-mark (elt svn-marks 1) ; 2nd column
                svn-update-mark (elt svn-marks 7)) ; 8th column

          (when (eq svn-property-mark ?\ ) (setq svn-property-mark nil))
          (when (eq svn-update-mark ?\ ) (setq svn-update-mark nil))

;; svn-prop-edit-mode:
;; --------------------------------------------------------------------------------

(defvar svn-prop-edit-mode-map () "Keymap used in `svn-prop-edit-mode' buffers.")

(when (not svn-prop-edit-mode-map)
  (setq svn-prop-edit-mode-map (make-sparse-keymap))
