Mercurial > emacs
changeset 83865:3fe905e1a618
(vc-svn-print-log): Change the "Working file" prefix back to singular,
for the sake of log-view.
| author | Glenn Morris <rgm@gnu.org> |
|---|---|
| date | Mon, 03 Sep 2007 06:19:16 +0000 |
| parents | d935eac5e18d |
| children | 409f4acaf5c9 |
| files | lisp/vc-svn.el |
| diffstat | 1 files changed, 8 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/vc-svn.el Mon Sep 03 06:18:58 2007 +0000 +++ b/lisp/vc-svn.el Mon Sep 03 06:19:16 2007 +0000 @@ -382,7 +382,14 @@ (let ((inhibit-read-only t)) (goto-char (point-min)) ;; Add a line to tell log-view-mode what file this is. - (insert "Working file(s): " (vc-delistify (mapcar 'file-relative-name files)) "\n")) + ;; FIXME as far as I can tell, this function at present can only + ;; be called with a single file argument. Therefore I changed + ;; the prompt back to singular, "file(s)" -> "file", since + ;; otherwise log-view-current-file breaks. It's trivial to + ;; adapt log-view-file-re for the new prefix, but less trivial + ;; to make log-view-current-file actually do the right thing in + ;; the multiple file case. + (insert "Working file: " (vc-delistify (mapcar 'file-relative-name files)) "\n")) (vc-svn-command buffer (if (and (= (length files) 1) (vc-stay-local-p (car files)) (fboundp 'start-process)) 'async 0)