igrep模式不方便汇编结果

时间:2013-08-01 22:17:13

标签: search emacs lisp

我正在使用igrep.el包并喜欢它。 但有一件事困扰着我。 在igrep结果页面中,第一行和最后一行作为编译的一部分被突出显示,因此使用next-error循环结果将最终命中这两行,当然没有相应的文件。

这些是第一个和最后一个文件的格式:

Igrep started at Thu Aug  1 15:15:23

finished (matches found) at Thu Aug  1 15:15:27

我相信这是负责这些线路的代码。 如何禁用这些行在grep结果中显示或至少不将它们作为结果的一部分突出显示:

(if igrep-find
(setq command
      (igrep-format-find-command command files)))
(cond ((eq igrep-save-buffers t) (save-some-buffers t))
  (igrep-save-buffers (save-some-buffers)))
(if (fboundp 'compilation-start)    ; Emacs 22
    (let ((compilation-process-setup-function 'grep-process-setup))
      (or (fboundp 'igrep-mode)
          (define-derived-mode igrep-mode grep-mode "Igrep"))
      (compilation-start command
                         'igrep-mode
                         nil
                         (cond ((eq compilation-highlight-regexp t))
                               (compilation-highlight-regexp
                                (if (eq program "fgrep")
                                    (regexp-quote regex)
                                  regex)))))
  (compile-internal command (format "No more %s matches" program)
                    "Igrep" nil grep-regexp-alist))))

1 个答案:

答案 0 :(得分:1)

问题是这些行的正则表达式需要“Grep”而不是“Igrep”。作为一个快速黑客,你可以用“Grep”替换那段代码中的两个“Igrep”字符串。

一个不太常见的解决方案是将grep-mode-font-lock-keywords这些正则表达式的表达式添加到{{1}}。这很简单:只需查看该var的当前值和从“^ Grep”开始的重复regexp到以“^ Igrep”开头的类似值