Pass optional file arg to fule-mode-code-file

[factor.git] / misc / fuel / fuel-scaffold.el

diff --git a/misc/fuel/fuel-scaffold.el b/misc/fuel/fuel-scaffold.el
index 1851e4290deb1f98e5f53b7134a658f195fa5f30..ab2a93495763e87aa4ae064d46f225c7cc6e342a 100644 (file)
--- a/misc/fuel/fuel-scaffold.el
+++ b/misc/fuel/fuel-scaffold.el
@@ -37,10 +37,10 @@
                            (file-name-directory file)))))
 
 (defun fuel-mode--in-docs (&optional file)
-  (fuel-mode--code-file "docs"))
+  (fuel-mode--code-file "docs" file))
 
 (defun fuel-mode--in-tests (&optional file)
-  (fuel-mode--code-file "tests"))
+  (fuel-mode--code-file "tests" file))
 
 (defun fuel-scaffold--vocab-roots ()
   (let ((cmd '(:fuel* (vocab-roots get)