diff options
author | Chaitanya Koparkar <ckoparkar@live.in> | 2016-04-06 12:29:50 +0530 |
---|---|---|
committer | Bozhidar Batsov <bozhidar.batsov@gmail.com> | 2016-04-06 09:59:50 +0300 |
commit | 140bb130f17ec9eb5db73133c60bc8269938e467 (patch) | |
tree | c383bf71b6d6d874f5a6c60f9bedc499e9a86302 /cider-mode.el | |
parent | d3725e9c5826871e137968af7247cb88ba97e2cc (diff) |
[#1352] Documentation complies with checkdoc style
Diffstat (limited to 'cider-mode.el')
-rw-r--r-- | cider-mode.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/cider-mode.el b/cider-mode.el index 8ead245d..a01d7737 100644 --- a/cider-mode.el +++ b/cider-mode.el @@ -376,7 +376,7 @@ The value can also be t, which means to font-lock as much as possible." value)) (defun cider--compile-font-lock-keywords (symbols-plist core-plist) - "Return a list of font-lock rules for the symbols in SYMBOLS-PLIST." + "Return a list of font-lock rules for the symbols in SYMBOLS-PLIST and CORE-PLIST." (let ((cider-font-lock-dynamically (if (eq cider-font-lock-dynamically t) '(function var macro core deprecated) cider-font-lock-dynamically)) @@ -401,7 +401,7 @@ The value can also be t, which means to font-lock as much as possible." ;; we catch that case too. ;; FIXME: This matches values too, not just keys. (when (seq-find (lambda (k) (and (stringp k) - (string-match (rx "clojure.tools.trace/traced" eos) k))) + (string-match (rx "clojure.tools.trace/traced" eos) k))) meta) (push sym traced)) (when (and do-deprecated (nrepl-dict-get meta "deprecated")) @@ -586,7 +586,7 @@ before point." (cider--parse-and-apply-locals end locals-above)))))) (defun cider--wrap-fontify-locals (func) - "Return a function that calls FUNC after parsing local variables. + "Return a function that will call FUNC after parsing local variables. The local variables are stored in a list under the `cider-locals' text property." (lambda (beg end &rest rest) |