Elisp Eldoc 显示函数文档

Elisp Eldoc 默认只显示参数表,我觉得显示文档也很有用。

(define-advice elisp-get-fnsym-args-string (:around (orig-fun sym &rest r) docstring)
  "If SYM is a function, append its docstring."
  (concat
   (apply orig-fun sym r)
   (let* ((doc (and (fboundp sym) (documentation sym 'raw)))
          (oneline (and doc (substring doc 0 (string-match "\n" doc)))))
     (and oneline
          (concat "  |  " (propertize oneline 'face 'italic))))))
4 个赞

这个是加到哪里啊,eldoc里没找到参数为symbol的函数。。。

随便,只要执行过就行。Advice 一个函数不需要这个函数存在(Emacs 已知),跟 add-hook 不要求 Hook 存在一样。