如何告诉 Emacs 在搜索和替换字符串中保留大小写？

Question

我正在尝试在 Emacs 中执行正则表达式搜索和替换（使用 Mx query-replace-regexp），但通常有用的智能案例却妨碍了我。我的来源是：

One
Two
Three

我想将每一行替换为 之类的内容。不幸的是，每行开头的大写字母都被误解了，我得到的 是我不想要的大写字母。

我可以找到有关如何使搜索区分大小写以及如何在替换字符串中保持 \1 小写的示例，但没有找到有关如何保持整个替换字符串大小写不变的示例。

Answer 1

尝试将其添加到您的 .emacs：

(setq case-replace nil)

Ch v case-replace RET：

文档：非零意味着“查询替换”应该保留大小写
替代品。

以及手册的链接
替换命令和宽松匹配 详细说明与案例和适当变量的所有交互。

或者您可以定义一个新命令，例如：

(defun query-replace-no-case ()
   (interactive)
   (let ((case-replace nil))
       (call-interactively 'query-replace))))

并且，如果您在函数中对其进行编码，并且只想临时设置变量，则可以执行以下操作：

(let ((case-replace nil))
   (while (search-forward ...)
       (replace-match ...)))

Answer 2

在当前的 emacs 中，您可以在选项菜单中找到该选项。如果您希望通过同一菜单保存选项。