branch: elpa/vc-fossil
commit c642a014d87058feac5b8202f5dde2476c1feb46
Author: fifr <fifr>
Commit: fifr <fifr>

    Pass `vc-checkin-switches` on checkin.
    
    This is required by the VC interface.
---
 vc/el/vc-fossil.el | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/vc/el/vc-fossil.el b/vc/el/vc-fossil.el
index db27336..c7ed4cc 100644
--- a/vc/el/vc-fossil.el
+++ b/vc/el/vc-fossil.el
@@ -193,7 +193,10 @@ If `files` is nil return the status for all files."
 
 
 (defun vc-fossil-checkin (files rev comment)
-  (vc-fossil-command nil 0 files "commit" "-m" comment))
+  (apply 'vc-fossil-command nil 0 files "commit" "-m" comment
+         (if (stringp vc-checkin-switches)
+             (list vc-checkin-switches)
+           vc-checkin-switches)))
 
 (defun vc-fossil-find-revision (file rev buffer)
   (apply #'vc-fossil-command buffer 0 file

Reply via email to