changeset 57696:fbcb259c5936

* progmodes/flymake.el (flymake-split-string): Use `flymake-split-string-remove-empty-edges' in any case. * progmodes/flymake.el (flymake-err-line-patterns): Use `compilation-error-regexp-alist-alist' instead of `compilation-error-regexp-alist'.
author Masatake YAMATO <jet@gyve.org>
date Mon, 25 Oct 2004 16:58:46 +0000
parents e29c77181435
children 64443697a546
files lisp/ChangeLog lisp/progmodes/flymake.el
diffstat 2 files changed, 14 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/ChangeLog	Mon Oct 25 16:05:27 2004 +0000
+++ b/lisp/ChangeLog	Mon Oct 25 16:58:46 2004 +0000
@@ -1,3 +1,14 @@
+2004-10-26  Pavel Kobiakov  <pk_at_work@yahoo.com>
+
+	* progmodes/flymake.el (flymake-split-string): Use
+	`flymake-split-string-remove-empty-edges' in any case.
+	
+2004-10-26  Masatake YAMATO  <jet@gyve.org>
+
+	* progmodes/flymake.el (flymake-err-line-patterns): 
+	Use `compilation-error-regexp-alist-alist' instead of 
+	`compilation-error-regexp-alist'.
+
 2004-10-25  Jay Belanger  <belanger@truman.edu>
 
 	* calc/calc-incom.el (calc-digit-dots):  Inhibit read-only before
--- a/lisp/progmodes/flymake.el	Mon Oct 25 16:05:27 2004 +0000
+++ b/lisp/progmodes/flymake.el	Mon Oct 25 16:58:46 2004 +0000
@@ -94,7 +94,7 @@
 (defun flymake-split-string(str pattern)
     (cond
 	((equal flymake-emacs 'xemacs)  (flymake-split-string-remove-empty-edges str pattern))
-	(t                              (split-string str pattern))
+	(t                              (flymake-split-string-remove-empty-edges str pattern))
     )
 )
 
@@ -1243,7 +1243,8 @@
 	   (" *\\(\\[javac\\]\\)? *\\(\\([a-zA-Z]:\\)?[^:(\t\n]+\\)\:\\([0-9]+\\)\:[ \t\n]*\\(.+\\)"
 	2 4 nil 5)
       )
-     compilation-error-regexp-alist)
+     ;; compilation-error-regexp-alist)
+     (mapcar (lambda (x) (cdr x)) compilation-error-regexp-alist-alist)) 
     "patterns for matching error/warning lines, (regexp file-idx line-idx err-text-idx)"
 )
 ;(defcustom flymake-err-line-patterns