emacs - 将带参数的函数添加到钩子(Hook)

Question

当我使用以下命令打开源代码文件时，我想根据编程语言运行一个函数。我必须将特定于语言的 str 传递给 foo 函数。在add-hook语句中如何实现？

(defun foo (str)
   (blahblah...))
(add-hook 'prog-mode-hook 'foo)

Answer 1

使用内置的apply-partially:

(add-hook 'prog-mode-hook (apply-partially #'foo "spam with eggs"))