emacs - 如何在 Emacs 中为当前词调用描述函数？

Question

我想编写一个调用 describe-function 的 Emacs 函数为 current-word .如果没有名为 current-word 的函数然后它调用 describe-variable .

我试着写了，但我什至不能打电话describe-function为 current-word ...

(defun describe-function-or-variable ()
(interactive)
(describe-function `(current-word)))

我该怎么写？

Answer 1

这样的事情应该工作:

(defun describe-function-or-variable ()
  (interactive)
  (let ((sym (intern-soft (current-word))))
    (cond ((null sym)
           "nothing")
          ((functionp sym)
           (describe-function sym))
          (t
           (describe-variable sym)))))