Mercurial > emacs
comparison lisp/progmodes/grep.el @ 53851:823980f7d612
(grep-regexp-alist): Allow :, \t and ( in file names.
author | Stefan Monnier <monnier@iro.umontreal.ca> |
---|---|
date | Sun, 08 Feb 2004 20:15:45 +0000 |
parents | 4deb14fde58c |
children | 1bd1c7b73c9d |
comparison
equal
deleted
inserted
replaced
53850:d19a78b5f1e5 | 53851:823980f7d612 |
---|---|
1 ;;; grep.el --- run compiler as inferior of Emacs, parse error messages | 1 ;;; grep.el --- run compiler as inferior of Emacs, parse error messages |
2 | 2 |
3 ;; Copyright (C) 1985, 86, 87, 93, 94, 95, 96, 97, 98, 1999, 2001, 2002 | 3 ;; Copyright (C) 1985, 86, 87, 93, 94, 95, 96, 97, 98, 1999, 2001, 02, 2004 |
4 ;; Free Software Foundation, Inc. | 4 ;; Free Software Foundation, Inc. |
5 | 5 |
6 ;; Author: Roland McGrath <roland@gnu.org> | 6 ;; Author: Roland McGrath <roland@gnu.org> |
7 ;; Maintainer: FSF | 7 ;; Maintainer: FSF |
8 ;; Keywords: tools, processes | 8 ;; Keywords: tools, processes |
214 `complation-last-buffer' rather than `grep-last-buffer'.") | 214 `complation-last-buffer' rather than `grep-last-buffer'.") |
215 | 215 |
216 ;; Note: the character class after the optional drive letter does not | 216 ;; Note: the character class after the optional drive letter does not |
217 ;; include a space to support file names with blanks. | 217 ;; include a space to support file names with blanks. |
218 (defvar grep-regexp-alist | 218 (defvar grep-regexp-alist |
219 '(("\\([a-zA-Z]?:?[^:(\t\n]+\\)[:( \t]+\\([0-9]+\\)[:) \t]" 1 2)) | 219 '(("\\([a-zA-Z]?:?.+?\\)[:( \t]+\\([0-9]+\\)[:) \t]" 1 2)) |
220 "Regexp used to match grep hits. See `compilation-error-regexp-alist'.") | 220 "Regexp used to match grep hits. See `compilation-error-regexp-alist'.") |
221 | 221 |
222 (defvar grep-program | 222 (defvar grep-program |
223 ;; Currently zgrep has trouble. It runs egrep instead of grep, | 223 ;; Currently zgrep has trouble. It runs egrep instead of grep, |
224 ;; and it doesn't pass along long options right. | 224 ;; and it doesn't pass along long options right. |