(vc-mtn-register): Fix optional arguments.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 42aaaa40439726fcc811aa287812cee5f5203ba5..2c1aa57c6c29135b207e12fa2af362c07f70fc0c 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,7 @@
 2009-04-01  Dan Nicolaescu  <dann@ics.uci.edu>
 
+       * vc-mtn.el (vc-mtn-register): Fix optional arguments.
+
        * vc-hooks.el (vc-name): Avoid calling vc-backend twice.
        (vc-mode-line): Accept and use an optional argument for the
        backend.

diff --git a/lisp/vc-mtn.el b/lisp/vc-mtn.el
index e051477818dd8bbf03970c2a280c1b99f4ed6495..6e9237ec38e49da9869c80b9d990ebacd47d914e 100644 (file)
--- a/lisp/vc-mtn.el
+++ b/lisp/vc-mtn.el
@@ -151,7 +151,7 @@ If nil, use the value of `vc-diff-switches'.  If t, use no switches."
              (t ?:))
            branch)))
 
-(defun vc-mtn-register (files &optional rest)
+(defun vc-mtn-register (files &optional rev comment)
   (vc-mtn-command nil 0 files "add"))
 
 (defun vc-mtn-responsible-p (file) (vc-mtn-root file))