1

我想将所做的 ispell 替换记录到一个文件中(无论是手动r还是从列表中0......)

每次进行“更正”时,都有两个相关的词:

  1. ispell 标识为不正确的单词。
  2. 最终取而代之的词。[也许""当它跳过时]

我只想将这些对记录到文件中以进行“分析”(可能还有抽认卡)

我仍在浏览代码以查看是否有将其插入的地方。我看到ispell-update-post-hookused inispell-command-loop但我不确定这是否是我想要的。我也不确定如何获得上述一对单词并将它们写入文件,因为钩子(省略无知?)似乎提供访问权限。

4

1 回答 1

1

此代码可以满足您的要求。它不检查生成的文件中的重复项,它只是附加到现有文件。

(defvar save-ispell-words-file "~/spell_check.txt")
(defadvice ispell-command-loop (after save-ispell-words activate)
  "Save the misspelled words and their replacements"
  (when (or (null ad-return-value)
            (stringp ad-return-value))
    (save-excursion
      (set-buffer (find-file-noselect save-ispell-words-file))
      (goto-char (point-max))
      (insert (format "%s %s\n" (ad-get-arg 2) (if (null ad-return-value) "\"\"" ad-return-value)))
      (save-buffer))))

用 Emacs 27.2 测试。

于 2021-10-08T22:43:05.637 回答