summaryrefslogtreecommitdiff
path: root/.dir-locals.el
diff options
context:
space:
mode:
Diffstat (limited to '.dir-locals.el')
-rw-r--r--.dir-locals.el19
1 files changed, 19 insertions, 0 deletions
diff --git a/.dir-locals.el b/.dir-locals.el
new file mode 100644
index 0000000..fdc6b52
--- /dev/null
+++ b/.dir-locals.el
@@ -0,0 +1,19 @@
+((fennel-mode . ((eval . (put 'ns 'fennel-doc-string-elt 2))
+ (eval . (put 'ns 'fennel-indent-function 1))
+ (eval . (put 'def 'fennel-indent-function 'defun))
+ (eval . (put 'defn 'fennel-indent-function 'defun))
+ (eval . (put 'defn 'fennel-doc-string-elt 2))
+ (eval . (put 'defn- 'fennel-indent-function 'defun))
+ (eval . (put 'defn- 'fennel-doc-string-elt 2))
+ (eval . (put 'fn* 'fennel-indent-function 'defun))
+ (eval . (put 'fn* 'fennel-doc-string-elt 2))
+ (eval . (put 'if-let 'fennel-indent-function 1))
+ (eval . (put 'when-let 'fennel-indent-function 1))
+ (eval . (put 'if-some 'fennel-indent-function 1))
+ (eval . (put 'when-some 'fennel-indent-function 1))
+ (eval . (put 'defmulti 'fennel-indent-function 'defun))
+ (eval . (put 'defmethod 'fennel-indent-function 2))
+ (eval . (put 'defmethod 'fennel-doc-string-elt 2))
+ (eval . (font-lock-add-keywords 'fennel-mode '(("\\<\\(?:def\\(?:m\\(?:ethod\\|ulti\\)\\|n-?\\)?\\|fn\\*\\|if-\\(?:let\\|some\\)\\|ns\\|time\\|when-\\(?:let\\|some\\)\\)\\>" . 'font-lock-keyword-face))))
+ (eval . (font-lock-add-keywords 'fennel-mode '(("\\s(\\(?:defn-?\\|fn\\*\\)[[:space:]]+\\(\\(?:\\sw\\|\\s_\\|-\\|_\\)+\\)" 1 'font-lock-function-name-face))))
+ (eval . (add-to-list 'imenu-generic-expression `(nil "\\s(\\(?:defn-?\\|fn\\*\\)[[:space:]]+\\(\\(?:\\sw\\|\\s_\\|-\\|_\\)+\\)" 1))))))