emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] Changes to emacs/lisp/vc-mcvs.el,v


From: Glenn Morris
Subject: [Emacs-diffs] Changes to emacs/lisp/vc-mcvs.el,v
Date: Fri, 12 Oct 2007 03:01:13 +0000

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Glenn Morris <gm>       07/10/12 03:01:13

Index: vc-mcvs.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/vc-mcvs.el,v
retrieving revision 1.29
retrieving revision 1.30
diff -u -b -r1.29 -r1.30
--- vc-mcvs.el  10 Oct 2007 19:39:23 -0000      1.29
+++ vc-mcvs.el  12 Oct 2007 03:01:13 -0000      1.30
@@ -277,7 +277,7 @@
       ;; be applied just to this one file.
       (apply 'vc-mcvs-command nil 0 files "tag" "-b" (list rev))
       (apply 'vc-mcvs-command nil 0 files "update" "-r" (list rev))
-      (mapcar (lambda (file) (vc-file-setprop file 'vc-mcvs-sticky-tag rev))
+      (mapc (lambda (file) (vc-file-setprop file 'vc-mcvs-sticky-tag rev))
              files)
       (setq rev nil)))
   ;; This commit might cvs-commit several files (e.g. MAP and TYPES)
@@ -292,7 +292,7 @@
       ;; Check checkin problem.
       (cond
        ((re-search-forward "Up-to-date check failed" nil t)
-       (mapcar (lambda (file) (vc-file-setprop file 'vc-state 'needs-merge))
+       (mapc (lambda (file) (vc-file-setprop file 'vc-state 'needs-merge))
              files)
         (error (substitute-command-keys
                 (concat "Up-to-date check failed: "




reply via email to

[Prev in Thread] Current Thread [Next in Thread]