comparison lisp/progmodes/flymake.el @ 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'.

57695:e29c77181435

    )
)
(defun flymake-split-string(str pattern)
    (cond
	((equal flymake-emacs 'xemacs)  (flymake-split-string-remove-empty-edges str pattern))
	(t                              (split-string str pattern))
    )
)

(defun flymake-get-temp-dir()
    (cond

    ; LaTeX warnings (fileless) ("\\(LaTeX \\(Warning\\|Error\\): .*\\) on input line \\([0-9]+\\)" 20 3 nil 1)
    ; ant/javac
	   (" *\\(\\[javac\\]\\)? *\\(\\([a-zA-Z]:\\)?[^:(\t\n]+\\)\:\\([0-9]+\\)\:[ \t\n]*\\(.+\\)"
	2 4 nil 5)
      )
     compilation-error-regexp-alist)
    "patterns for matching error/warning lines, (regexp file-idx line-idx err-text-idx)"
)
;(defcustom flymake-err-line-patterns
;  '(
;    ; MS Visual C++ 6.0

57696:fbcb259c5936

    )
)
(defun flymake-split-string(str pattern)
    (cond
	((equal flymake-emacs 'xemacs)  (flymake-split-string-remove-empty-edges str pattern))
	(t                              (flymake-split-string-remove-empty-edges str pattern))
    )
)

(defun flymake-get-temp-dir()
    (cond

    ; LaTeX warnings (fileless) ("\\(LaTeX \\(Warning\\|Error\\): .*\\) on input line \\([0-9]+\\)" 20 3 nil 1)
    ; ant/javac
	   (" *\\(\\[javac\\]\\)? *\\(\\([a-zA-Z]:\\)?[^:(\t\n]+\\)\:\\([0-9]+\\)\:[ \t\n]*\\(.+\\)"
	2 4 nil 5)
      )
     ;; 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
;  '(
;    ; MS Visual C++ 6.0