aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/progmodes/elisp-mode.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/progmodes/elisp-mode.el')
-rw-r--r--lisp/progmodes/elisp-mode.el10
1 files changed, 6 insertions, 4 deletions
diff --git a/lisp/progmodes/elisp-mode.el b/lisp/progmodes/elisp-mode.el
index 2f44118edb5..21ba42a0fe1 100644
--- a/lisp/progmodes/elisp-mode.el
+++ b/lisp/progmodes/elisp-mode.el
@@ -1420,10 +1420,12 @@ Intended for `eldoc-documentation-functions' (which see)."
1420(defun elisp-eldoc-var-docstring (callback &rest _ignored) 1420(defun elisp-eldoc-var-docstring (callback &rest _ignored)
1421 "Document variable at point. 1421 "Document variable at point.
1422Intended for `eldoc-documentation-functions' (which see)." 1422Intended for `eldoc-documentation-functions' (which see)."
1423 (let ((sym (elisp--current-symbol))) 1423 (let* ((sym (elisp--current-symbol))
1424 (when sym (funcall callback (elisp-get-var-docstring sym) 1424 (docstring (and sym (elisp-get-var-docstring sym))))
1425 :thing sym 1425 (when docstring
1426 :face 'font-lock-variable-name-face)))) 1426 (funcall callback docstring
1427 :thing sym
1428 :face 'font-lock-variable-name-face))))
1427 1429
1428(defun elisp-get-fnsym-args-string (sym &optional index) 1430(defun elisp-get-fnsym-args-string (sym &optional index)
1429 "Return a string containing the parameter list of the function SYM. 1431 "Return a string containing the parameter list of the function SYM.