regex - emacs 使用正则表达式搜索和替换

Question

使用 emacs，如何在缓冲区中搜索和替换正则表达式？除了交互式评估之外，我如何通过评估 elisp 以编程方式执行此操作？例如，将一个或多个空格替换为制表符，我需要将 ' +'(一个或多个空格)与 C-q-TAB 之类的内容相匹配。这可能吗？

Answer 1

您可以按如下方式以编程方式执行此操作:

(defun region-replace-multiple-spaces-with-single-space(beg end)
  (interactive "*r")
  (save-restriction
    (narrow-to-region beg end)
    (save-excursion
      (goto-char (point-min))
      (while (search-forward-regexp " +" nil t)
    (replace-match " " nil nil)))))