在 Emacs 中自动更正单词时强制 Flyspell 转到单词末尾

Question

我发现当你执行 Flyspell-auto- Correct-word 命令时，flyspell 似乎停留在单词的中间，这很烦人。可以更改此设置以在运行命令后强制它转到单词的末尾吗？它可能就像设置一个键绑定到自动完成单词然后向前移动单词一样简单，我知道该怎么做。但这并非在所有情况下都有效，因为有时如果自动完成的单词小于键入的单词，它会将光标放在单词后面。对此的任何帮助都会很棒。

Answer 1

尝试以下代码：

(eval-after-load "flyspell"
  '(defun flyspell-ajust-cursor-point (save cursor-location old-max)
     (when (not (looking-at "\\b"))
       (forward-word))))

使用 Flyspell 版本 1.7k 以及 Emacs 23.2 附带的版本进行测试。

Answer 2

我浏览了 (defun Flyspell-auto- Correct-word ...) ，我看不到任何好的钩子或其他自定义点，所以我认为你最好的选择是使用 Ch f defadvice：

(defadvice flyspell-auto-correct-word (after flyspell-forward-word activate) (flyspell-goto-next-error))