From: Juanma Barranquero <lekktu@gmail.com>
Date: Sun, 23 Mar 2014 18:13:35 +0000 (+0100)
Subject: lisp/vc/vc.el (vc-rollback): Use set-buffer-modified-p.
X-Git-Tag: emacs-25.0.90~2640^2~345
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=835af7195792e9e736a6acc3ef51b21e23020c2c;p=emacs.git

lisp/vc/vc.el (vc-rollback): Use set-buffer-modified-p.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index c7015c7a7d5..bd87881c9ba 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2014-03-23  Juanma Barranquero  <lekktu@gmail.com>
+
+	* vc/vc.el (vc-rollback): Use set-buffer-modified-p.
+
 2014-03-23  Daniel Colascione  <dancol@dancol.org>
 
 	Change subword-mode to use `find-word-boundary-function-table' and
diff --git a/lisp/vc/vc.el b/lisp/vc/vc.el
index 4a536900eb3..305cc6b561e 100644
--- a/lisp/vc/vc.el
+++ b/lisp/vc/vc.el
@@ -2450,7 +2450,7 @@ depending on the underlying version-control system."
 	(error "Please revert all modified workfiles before rollback")))
     ;; Accumulate changes associated with the fileset
     (vc-setup-buffer "*vc-diff*")
-    (not-modified)
+    (set-buffer-modified-p nil)
     (message "Finding changes...")
     (let* ((tip (vc-working-revision (car files)))
            ;; FIXME: `previous-revision' should take the fileset.