[nongnu] elpa/vc-fossil f4795ba 044/111: Pass `vc-checkout-switches` on checkout.

[ELPA Syncer]

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

    Pass `vc-checkout-switches` on checkout.
    
    This is required by the VC interface.
---
 vc/el/vc-fossil.el | 11 +++++++++--
 1 file changed, 9 insertions(+), 2 deletions(-)

diff --git a/vc/el/vc-fossil.el b/vc/el/vc-fossil.el
index 64614f6..d32a724 100644
--- a/vc/el/vc-fossil.el
+++ b/vc/el/vc-fossil.el
@@ -208,8 +208,15 @@ If `files` is nil return the status for all files."
            vc-checkout-switches)))
 
 (defun vc-fossil-checkout (file &optional editable rev)
-  (apply #'vc-fossil-command nil 0 nil
-         "update" `(,@(if (eq rev t) '() `(,rev)))))
+  (apply #'vc-fossil-command nil 0 file
+         "update"
+         (append (cond
+                  ((eq rev t) nil)
+                  (rev (list rev))
+                  (t nil))
+                 (if (listp vc-checkout-switches)
+                     vc-checkout-switches
+                   (list vc-checkout-switches)))))
 
 (defun vc-fossil-revert (file &optional contents-done)
   "Revert FILE to the version stored in the fossil repository."