From b89b385c167822aaaea6057ebdae848b5c02d4ab Mon Sep 17 00:00:00 2001 From: Chong Yidong Date: Sun, 7 Sep 2008 19:05:05 +0000 Subject: [PATCH] (flymake-parse-err-lines): Filter out errors occurring in different files. --- lisp/progmodes/flymake.el | 8 +++----- 1 file changed, 3 insertions(+), 5 deletions(-) diff --git a/lisp/progmodes/flymake.el b/lisp/progmodes/flymake.el index 715ddc2b827..7f35e300994 100644 --- a/lisp/progmodes/flymake.el +++ b/lisp/progmodes/flymake.el @@ -854,11 +854,9 @@ Perhaps use text from LINE-ERR-INFO-LIST to enhance highlighting." (flymake-ler-file line-err-info))) (setq line-err-info (flymake-ler-set-full-file line-err-info real-file-name)) - (if (flymake-same-files real-file-name source-file-name) - (setq line-err-info (flymake-ler-set-file line-err-info nil)) - (setq line-err-info (flymake-ler-set-file line-err-info (file-name-nondirectory real-file-name)))) - - (setq err-info-list (flymake-add-err-info err-info-list line-err-info))) + (when (flymake-same-files real-file-name source-file-name) + (setq line-err-info (flymake-ler-set-file line-err-info nil)) + (setq err-info-list (flymake-add-err-info err-info-list line-err-info)))) (flymake-log 3 "parsed '%s', %s line-err-info" (nth idx lines) (if line-err-info "got" "no")) (setq idx (1+ idx))) err-info-list)) -- 2.39.5