From 5cd4100a4e9e7b7cf77b21f2759f6401cd9a06d9 Mon Sep 17 00:00:00 2001 From: Andrey Listopadov Date: Fri, 23 Jul 2021 21:41:22 +0300 Subject: fix: don't generate mulitarity arglist doc for single-arity functions --- .dir-locals.el | 6 ++++++ 1 file changed, 6 insertions(+) (limited to '.dir-locals.el') diff --git a/.dir-locals.el b/.dir-locals.el index af4b307..be31ff9 100644 --- a/.dir-locals.el +++ b/.dir-locals.el @@ -32,6 +32,12 @@ "loop")) word-end) 1 'font-lock-keyword-face)))) + (eval . (font-lock-add-keywords + 'fennel-mode + `((,(rx (syntax open-parenthesis) + (or "fn*" "defn" "defmulti") (1+ space) + (group (1+ (or (syntax word) (syntax symbol) "-" "_")))) + 1 'font-lock-function-name-face)))) (eval . (put 'when-meta 'fennel-indent-function 'defun)) (eval . (put 'defmethod 'fennel-indent-function 3)) (eval . (put 'defmulti 'bfennel-indent-function 'defun)) -- cgit v1.2.3