c# - emacs:帮我用 flymake 和 csharp 解决这个自动加载排序问题

Question

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

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

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

这是挑战。

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

在运行时修补列表是没有问题的。它看起来像这样:

  (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 将获得更灵活的 init/cleanup 例程和 bob 是你的叔叔。

但现在我希望 flymake-for-csharp 能够与现有的(内置)flymake.el 一起使用。问题就在这里:我怎样才能使 flymake-for-csharp 自动加载，同时仍然修补列表？

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

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

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

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

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

---

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

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

• 只有在自动加载 flymake 的情况下，它才有效吗？当(外部)eval-after-load 被 eval 时，对于已经加载的模块，eval-after-load 中的逻辑会发生什么情况？

• 如何在不影响用户的 emacs.el 的情况下执行此操作？

---

总而言之， 我如何交付一个需要修补 flymake 的模块，启动时间最短(=自动加载)并且对用户的 emacs.el 影响最小？

Answer 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 trick通过将 ;;;###autoload 注释放在包中的 eval-after-load 行之前，让用户自动加载此代码，然后重建loaddefs.el 文件。

但是，如果您希望找到一个在互联网上普遍使用的解决方案，您需要用户在他们的 .emacs 中包含这两行。

---

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

(let ((csharpentry (assoc "\\.cs\\'" flymake-allowed-file-name-masks)))
  (when csharpentry
    (setcdr csharpentry '(flymake-for-csharp-init flymake-for-csharp-cleanup))))