From: Jason Rumney <jasonr@gnu.org>
Date: Sun, 5 Aug 2007 21:46:00 +0000 (+0000)
Subject: (vc-rollback): Add norevert argument back.
X-Git-Tag: emacs-pretest-23.0.90~11586
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=a92b30a61ee2092c2edc43a4d8bc38fd1e265dc0;p=emacs.git

(vc-rollback): Add norevert argument back.
(vc-revert-buffer): Add back as obsolete alias.
---

diff --git a/lisp/vc.el b/lisp/vc.el
index 78e098d874f..2b2dd9fb8c9 100644
--- a/lisp/vc.el
+++ b/lisp/vc.el
@@ -2635,6 +2635,9 @@ changes found in the master file; use \\[universal-argument] \\[vc-next-action]
     (vc-revert-file file)
     (message "Reverting %s...done" file)))
 
+;;;###autoload
+(define-obsolete-function-alias 'vc-revert-buffer 'vc-revert "23.1")
+
 ;;;###autoload
 (defun vc-update ()
   "Update the current buffer's file to the latest version on its branch.
@@ -2718,8 +2721,9 @@ return its name; otherwise return nil."
   (vc-resynch-buffer file t t))
 
 ;;;###autoload
-(defun vc-rollback ()
-  "Get rid of most recently checked in version of this file."
+(defun vc-rollback (&optional norevert)
+  "Get rid of most recently checked in version of this file.
+A prefix argument NOREVERT means do not revert the buffer afterwards."
   (interactive "P")
   (vc-ensure-vc-buffer)
   (let* ((file buffer-file-name)