Mercurial > emacs
changeset 2219:a729b16f7427
(vc-version-diff): Use (message ...), not (message (format ...)).
(vc-backend-checkout, vc-backend-assign-name): Correct bogus messages.
| author | Paul Eggert <eggert@twinsun.com> |
|---|---|
| date | Tue, 16 Mar 1993 21:09:56 +0000 |
| parents | 13be90dfef0c |
| children | 66371f0b8aff |
| files | lisp/vc.el |
| diffstat | 1 files changed, 3 insertions(+), 4 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/vc.el Tue Mar 16 20:21:05 1993 +0000 +++ b/lisp/vc.el Tue Mar 16 21:09:56 1993 +0000 @@ -5,7 +5,7 @@ ;; Author: Eric S. Raymond <esr@snark.thyrsus.com> ;; Version: 5.0 -;; $Id: vc.el,v 1.25 1993/03/11 07:45:02 eric Exp eric $ +;; $Id: vc.el,v 1.26.1.1 1993/03/16 20:54:53 eggert Exp $ ;; This file is part of GNU Emacs. @@ -572,7 +572,7 @@ (set-buffer (get-buffer-create "*vc*")) (vc-file-tree-walk (function (lambda (f) - (message (format "Looking at %s" f)) + (message "Looking at %s" f) (and (not (file-directory-p f)) (vc-registered f) @@ -1072,7 +1072,7 @@ (defun vc-backend-checkout (file &optional writeable rev) ;; Retrieve a copy of a saved version into a workfile - (message "Checking out %s...done" file) + (message "Checking out %s..." file) (vc-backend-dispatch file (progn (vc-do-command 0 "get" file ;; SCCS @@ -1181,7 +1181,6 @@ (vc-add-triple name file (vc-latest-version file)) ;; SCCS (vc-do-command 0 "rcs" file (concat "-n" name ":")) ;; RCS ) - (message "Removing last change from %s...done" file) ) (defun vc-backend-diff (file oldvers &optional newvers)