# HG changeset patch
# User Daniel Pfeiffer <occitan@esperanto.org>
# Date 1087599690 0
# Node ID 95c33e716dd321bee03992ee4044d235e0840e11
# Parent  0faa9af73cb1f77367822420cc7a7fd4d8cfff0d
(grep-regexp-alist): Match columns and column ranges, if present.

diff -r 0faa9af73cb1 -r 95c33e716dd3 lisp/progmodes/grep.el
--- a/lisp/progmodes/grep.el	Fri Jun 18 23:00:46 2004 +0000
+++ b/lisp/progmodes/grep.el	Fri Jun 18 23:01:30 2004 +0000
@@ -216,7 +216,7 @@
 `complation-last-buffer' rather than `grep-last-buffer'.")
 
 (defvar grep-regexp-alist
-  '(("^\\(.+?\\)[:( \t]+\\([0-9]+\\)[:) \t]" 1 2)
+  '(("^\\(.+?\\)[:( \t]+\\([0-9]+\\)\\([:) \t]\\)\\(?:\\([0-9]+\\)\\(?:-\\([0-9]+\\)\\)?\\3\\)?" 1 2 (4 . 5))
     ("^Binary file \\(.+\\) matches$" 1 nil nil 1))
   "Regexp used to match grep hits.  See `compilation-error-regexp-alist'.")