如何在特定模式下手动保存Emacs中的缓冲区后自动运行函数？

Question

在手动保存缓冲区时，我希望在当前缓冲区上运行untabify。是否有一种简单的方法可以使用Emacs Lisp将此函数作为elm-mode的保存钩子运行？

这是行不通的：

(when (eq (print major-mode) "elm-mode")
   (add-hook 'after-save-hook 'untabify))

Answer 1

首先，您发布的代码无法工作，因为(假设它在init文件中是这样编写的)，它将在Emacs启动时运行；此时，major-mode很可能不是elm-mode，因此不会添加钩子。

然后：print不返回字符串。它打印一个字符串，并将其作为参数传递给returns。在这种情况下，major-mode是一个符号。若要检查当前的主要模式是否为elm模式，请执行(eq major-mode 'elm-mode)，有效地比较符号.另外，eq不适用于字符串比较，使用string=或string-equal。

您要做的是无条件地向after-save-hook添加一个钩子，并在钩子内检查是否应该执行该操作：

(add-hook 'after-save-hook (lambda ()
                             (when (eq major-mode 'elm-mode)
                               (untabify (point-min) (point-max)))))

您需要向untabify提供参数。在这种情况下，它只是取消了整个缓冲区。

另一种方法是添加缓冲区本地钩子，使用如下

(add-hook 'elm-mode-hook (lambda ()
                           (add-hook 'after-save-hook <my-function> nil t)))

和往常一样:查看手册，在info模式下从Emacs内部访问，使用describe-function on add-hook，等等。通常，如果您从检查内置文档开始，您将学到很多东西。