3

如何交付一个需要修补 flymake 的模块,同时启动时间最短(=autoload)并且对用户的 emacs.el 影响最小?

我正在研究 flymake-for-csharp 模块。它与 flymake 一起使用,教它如何更灵活地使用 C# 代码文件。例如,除了使用 makefile,flymake-for-csharp 还可以使用 .csproj 文件,或者可以直接调用 csc.exe。

该模块工作正常。我现在正试图让它正确地自动加载。

这就是挑战。

为了定义哪些语言可以使用 flymake,flymake.el 包含一个文件扩展名列表(.java、.cs、.c 等)以及每种语言的初始化和清理例程。在默认的 flymake.el 中有一个 C# 条目,但正如我所说,默认的 C# 行为不够灵活。为了使其更灵活,我需要替换 flymake alist 中的 C# 条目,使其指向 flymake-for-csharp 模块中的新 init/cleanup 逻辑。和我一起吗?

在运行时修补 alist 没有问题。它看起来像这样:

  (let (elt
        (csharp-entry nil)
        (masks flymake-allowed-file-name-masks))

    ;; Find the existing C# entry
    (while (consp masks)
      (setq elt (car masks))
      (if (string= "\\.cs\\'" (car elt))
          (setq csharp-entry elt))
      (setq masks (cdr masks)))

    ;;  remove the original entry for C# ...
    (if csharp-entry
        (setq flymake-allowed-file-name-masks
              (delete csharp-entry flymake-allowed-file-name-masks)))

    ;; Now add a new entry for C#, with the custom init and cleanup methods.
    (setq flymake-allowed-file-name-masks
          (cons
           '("\\.cs\\'" flymake-for-csharp-init flymake-for-csharp-cleanup)
           flymake-allowed-file-name-masks)))

长期的解决方案是说服 flymake 和 emacs 的作者接受目前在 flymake-for-csharp 中的逻辑。然后 alist 将获得更灵活的初始化/清理例程,并且bob 是你的叔叔

但现在我希望 flymake-for-csharp 与现有的(内置)flymake.el 一起工作。这就是问题所在:我怎样才能使 flymake-for-csharp 自动加载,同时仍然修补 alist?

理想情况下,我希望用户的 emacs.el 看起来像这样:

(autoload 'flymake-for-csharp-init "flymake-for-csharp" nil nil)

...可能有一小(eval-after-load ..部分。

但是你看,只有flymake alist 被修补以包含 C# 的新条目 后flymake-for-csharp-init才会调用该函数。

有没有办法解决这种先有鸡还是先有蛋的情况?


我想到的一种方法是(require 'flymake-for-csharp)使用autoload. 在该 flymake-for-csharp 模块中,仅运行补丁逻辑,然后以某种方式对其余功能使用自动加载。这是个好主意吗?这需要我在 2 个不同的文件中提供 flymake-for-csharp 吗?

我想到的另一种方法是使用eval-after-loadon flymake.el。我可以提供补丁功能。几个问题:

  • 只有当flymake自动加载时才有效吗?当(外部)eval-after-load 被评估时,对于已经加载的模块,eval-after-load 中的逻辑会发生什么?

  • 我将如何在不影响用户的 emacs.el 的情况下做到这一点?


总而言之,我怎样才能交付一个需要修补 flymake 的模块,同时启动时间最短(=autoload)并且对用户的 emacs.el 影响最小?

4

1 回答 1

1

如果我理解正确,让用户将其添加到他们.emacs将解决问题:

;;;###autoload
(eval-after-load "flymake" '(code-that-patches-flymake-allowed-file-name-masks))
(autoload 'flymake-for-csharp-init "flymake-for-csharp" nil nil)

现在,如果您与使用您的包的人一起工作,您可以使用loaddefs.el 技巧;;;###autoload,通过将注释放在包中的行之前,让用户自动加载此代码eval-after-load,然后重建loaddefs.el文件。

但是,如果您希望在 Internet 中获得一般用途的解决方案,您需要用户在他们的.emacs.


对您的清理代码的评论,我相信它可以简化为:

(let ((csharpentry (assoc "\\.cs\\'" flymake-allowed-file-name-masks)))
  (when csharpentry
    (setcdr csharpentry '(flymake-for-csharp-init flymake-for-csharp-cleanup))))
于 2010-11-16T22:02:27.063 回答