aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorRoland McGrath1995-01-15 11:00:38 +0000
committerRoland McGrath1995-01-15 11:00:38 +0000
commit4db1f5aa7b4b193a8c33f7f2bc2e1b27f5b940cd (patch)
tree7201b81812adb0e68b13f3894137f173c96f4d0f
parenta641f9a11ecd48164bbaf73f2b4c51277cd73979 (diff)
downloademacs-4db1f5aa7b4b193a8c33f7f2bc2e1b27f5b940cd.tar.gz
emacs-4db1f5aa7b4b193a8c33f7f2bc2e1b27f5b940cd.zip
(vc-do-command): Use set-buffer-modified-p instead of not-modified.
-rw-r--r--lisp/vc.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/vc.el b/lisp/vc.el
index 146de5e81b8..4b9567461b5 100644
--- a/lisp/vc.el
+++ b/lisp/vc.el
@@ -1,6 +1,6 @@
1;;; vc.el --- drive a version-control system from within Emacs 1;;; vc.el --- drive a version-control system from within Emacs
2 2
3;; Copyright (C) 1992, 1993, 1994 Free Software Foundation, Inc. 3;; Copyright (C) 1992, 1993, 1994, 1995 Free Software Foundation, Inc.
4 4
5;; Author: Eric S. Raymond <esr@snark.thyrsus.com> 5;; Author: Eric S. Raymond <esr@snark.thyrsus.com>
6;; Maintainer: ttn@netcom.com 6;; Maintainer: ttn@netcom.com
@@ -259,7 +259,7 @@ the master name of FILE if LAST is 'MASTER, or the workfile of FILE if LAST is
259 process-environment))) 259 process-environment)))
260 (setq status (apply 'call-process command nil t nil squeezed))) 260 (setq status (apply 'call-process command nil t nil squeezed)))
261 (goto-char (point-max)) 261 (goto-char (point-max))
262 (not-modified) 262 (set-buffer-modified-p nil)
263 (forward-line -1) 263 (forward-line -1)
264 (if (or (not (integerp status)) (< okstatus status)) 264 (if (or (not (integerp status)) (< okstatus status))
265 (progn 265 (progn