From 0d140e65afcce8472e34189a6db8036a1a481a3a Mon Sep 17 00:00:00 2001 From: Eli Zaretskii <eliz@gnu.org> Date: Fri, 16 Feb 2001 11:52:52 +0000 Subject: [PATCH] (grep-regexp-alist): Remove the blank from the character class after the (optional) drive, to support file names with embedded blanks. --- lisp/ChangeLog | 6 ++++++ lisp/progmodes/compile.el | 4 +++- 2 files changed, 9 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 900176c0761..30eba6bf269 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,9 @@ +2001-02-16 Eli Zaretskii <eliz@is.elta.co.il> + + * progmodes/compile.el (grep-regexp-alist): Remove the blank from + the character class after the (optional) drive, to support file + names with embedded blanks. + 2001-02-15 Sam Steingold <sds@gnu.org> * textmodes/tex-mode.el (tex-shell-running): diff --git a/lisp/progmodes/compile.el b/lisp/progmodes/compile.el index 2f33166e1f4..7bb976d1656 100644 --- a/lisp/progmodes/compile.el +++ b/lisp/progmodes/compile.el @@ -397,8 +397,10 @@ Otherwise, it saves all modified buffers without asking." :type 'boolean :group 'compilation) +;; Note: the character class after the optional drive letter does not +;; include a space to support file names with blanks. (defvar grep-regexp-alist - '(("\\([a-zA-Z]?:?[^:( \t\n]+\\)[:( \t]+\\([0-9]+\\)[:) \t]" 1 2)) + '(("\\([a-zA-Z]?:?[^:(\t\n]+\\)[:( \t]+\\([0-9]+\\)[:) \t]" 1 2)) "Regexp used to match grep hits. See `compilation-error-regexp-alist'.") (defvar grep-program -- 2.39.5