procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(grep-regexp-alist): Match an optional ^[[K

Browse source 
that some versions of grep produce.
(grep-mode-font-lock-keywords): Likewise.
This commit is contained in:
Dan Nicolaescu 2005-02-08 16:22:25 +00:00
parent 4183568644
commit e7eaabae69
2 changed files with 8 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
lisp/ChangeLog
View file

@ -1,3 +1,9 @@
2005-02-08 Dan Nicolaescu <dann@ics.uci.edu>
* progmodes/grep.el (grep-regexp-alist): Match an optional ^[[K
that some versions of grep produce.
(grep-mode-font-lock-keywords): Likewise.
2005-02-09 Nick Roberts <nickrob@snap.net.nz>
* progmodes/gdb-ui.el (gdb-location-list): New variable.

4
lisp/progmodes/grep.el
View file

@ -253,7 +253,7 @@ Notice that using \\[next-error] or \\[compile-goto-error] modifies
'(("^\\(.+?\\)[: \t]+\
\\([0-9]+\\)\\([.:]?\\)\\([0-9]+\\)?\
\\(?:-\\(?:\\([0-9]+\\)\\3\\)?\\.?\\([0-9]+\\)?\\)?[: \t]" 1 (2 . 5) (4 . 6))
("^\\(.+?\\)[:(]+\\([0-9]+\\)\\([:)]\\).*?\\(\033\\[01;41m\\)\\(.*?\\)\\(\033\\[00m\\)"
("^\\(.+?\\)[:(]+\\([0-9]+\\)\\([:)]\\).*?\\(\033\\[01;41m\\)\\(.*?\\)\\(\033\\[00m\\(\033\\[K\\)?\\)"
1 2
;; Calculate column positions (beg . end) of first grep match on a line
((lambda ()
@ -293,7 +293,7 @@ Notice that using \\[next-error] or \\[compile-goto-error] modifies
(1 compilation-warning-face)
(2 compilation-line-face))
;; Highlight grep matches and delete markers
("\\(\033\\[01;41m\\)\\(.*?\\)\\(\033\\[00m\\)"
("\\(\033\\[01;41m\\)\\(.*?\\)\\(\033\\[00m\\(\033\\[K\\)?\\)"
(2 grep-match-face)
((lambda (p))
(progn