Missing format argument in vc-rcs-create-tag

[Sven Joachim]

The function vc-rcs-create-tag lacks an argument to `format':

--8<---------------cut here---------------start------------->8---
--- vc-rcs.el.~1.76.~   2008-05-16 08:53:29.000000000 +0200
+++ vc-rcs.el   2008-05-16 09:23:22.000000000 +0200
@@ -792,7 +792,7 @@
 
 (defun vc-rcs-create-tag (backend dir name branchp)
   (when branchp
-    (error "RCS backend %s does not support module branches."))
+    (error "RCS backend %s does not support module branches" backend))
   (let ((result (vc-tag-precondition dir)))
     (if (stringp result)
        (error "File %s is not up-to-date" result)
--8<---------------cut here---------------end--------------->8---


2008-05-16  Sven Joachim  <address@hidden>

        * vc-rcs.el (vc-rcs-create-tag): Add format argument.