# HG changeset patch
# User Jason Rumney <jasonr@gnu.org>
# Date 1186350360 0
# Node ID 1414862f1a0da493b394e9c184c757412b5eabb7
# Parent  a779619b80584c6a1faafc75cab37af670dd2e77
(vc-rollback): Add norevert argument back.
(vc-revert-buffer): Add back as obsolete alias.

diff -r a779619b8058 -r 1414862f1a0d lisp/vc.el
--- a/lisp/vc.el	Sun Aug 05 14:08:50 2007 +0000
+++ b/lisp/vc.el	Sun Aug 05 21:46:00 2007 +0000
@@ -2636,6 +2636,9 @@
     (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.
 If the file contains no changes, and is not locked, then this simply replaces
@@ -2718,8 +2721,9 @@
   (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)