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.