Mercurial > emacs

diff lisp/vc/vc-arch.el @ 111291:d3584b6b6247

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Remove extra leftover args to vc-*-checkin. * vc/vc-arch.el (vc-arch-checkin): * vc/vc-cvs.el (vc-cvs-checkin): * vc/vc-mtn.el (vc-mtn-checkin): * vc/vc-rcs.el (vc-rcs-checkin): * vc/vc-sccs.el (vc-sccs-checkin): * vc/vc-svn.el (vc-svn-checkin): Remove optional extra arg, unused since 2010-04-21 commit by Stefan Monnier.
author Chong Yidong <cyd@stupidchicken.com>
date Sun, 31 Oct 2010 23:16:48 -0400
parents 280c8ae2476d
children 417b1e4d63cd
line wrap: on
line diff
--- a/lisp/vc/vc-arch.el	Sun Oct 31 19:55:12 2010 -0700
+++ b/lisp/vc/vc-arch.el	Sun Oct 31 23:16:48 2010 -0400
@@ -428,7 +428,7 @@
 	(message "There are unresolved conflicts in %s"
 		 (file-name-nondirectory rej))))))
 
-(defun vc-arch-checkin (files rev comment  &optional extra-args-ignored)
+(defun vc-arch-checkin (files rev comment)
   (if rev (error "Committing to a specific revision is unsupported"))
   ;; FIXME: This implementation probably only works for singleton filesets
   (let ((summary (file-relative-name (car files) (vc-arch-root (car files)))))