From: Juri Linkov Date: Thu, 16 Dec 2004 07:16:44 +0000 (+0000) Subject: (grep-match-face): New defvar. X-Git-Tag: ttn-vms-21-2-B4~3245 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=f30c45e10511ae3818725fe621ab526e70037787;p=emacs.git (grep-match-face): New defvar. (grep-mode-font-lock-keywords): Use grep-match-face instead of compilation-column-face to highlight grep matches. --- diff --git a/lisp/progmodes/grep.el b/lisp/progmodes/grep.el index fd4b716ae4b..04fcae78ea6 100644 --- a/lisp/progmodes/grep.el +++ b/lisp/progmodes/grep.el @@ -275,6 +275,9 @@ Notice that using \\[next-error] or \\[compile-goto-error] modifies (defvar grep-error-face compilation-error-face "Face name to use for grep error messages.") +(defvar grep-match-face 'match + "Face name to use for grep matches.") + (defvar grep-mode-font-lock-keywords '(;; Command output lines. ("^\\([A-Za-z_0-9/\.+-]+\\)[ \t]*:" 1 font-lock-function-name-face) @@ -291,7 +294,7 @@ Notice that using \\[next-error] or \\[compile-goto-error] modifies (2 compilation-line-face)) ;; Highlight grep matches and delete markers ("\\(\033\\[01;41m\\)\\(.*?\\)\\(\033\\[00m\\)" - (2 compilation-column-face) + (2 grep-match-face) ((lambda (p)) (progn ;; Delete markers with `replace-match' because it updates