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

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 d90a3bc6b730
children 417b1e4d63cd
line wrap: on
line diff
--- a/lisp/vc/vc-sccs.el	Sun Oct 31 19:55:12 2010 -0700
+++ b/lisp/vc/vc-sccs.el	Sun Oct 31 23:16:48 2010 -0400
@@ -237,7 +237,7 @@
       (stringp (vc-sccs-search-project-dir (or (file-name-directory file) "")
 					   (file-name-nondirectory file)))))
 
-(defun vc-sccs-checkin (files rev comment &optional extra-args-ignored)
+(defun vc-sccs-checkin (files rev comment)
   "SCCS-specific version of `vc-backend-checkin'."
   (dolist (file (vc-expand-dirs files))
     (apply 'vc-sccs-do-command nil 0 "delta" (vc-name file)