diff options
author | Chong Yidong <cyd@stupidchicken.com> | 2008-09-07 19:05:05 +0000 |
---|---|---|
committer | Chong Yidong <cyd@stupidchicken.com> | 2008-09-07 19:05:05 +0000 |
commit | b89b385c167822aaaea6057ebdae848b5c02d4ab (patch) | |
tree | 3b8b72f1b01e6136c90a4e23ace449164802c0fc /lisp/progmodes/flymake.el | |
parent | 33a9c7c35bfee2cd8dbcb5fea662f3ab4fafa270 (diff) | |
download | emacs-b89b385c167822aaaea6057ebdae848b5c02d4ab.tar.gz |
(flymake-parse-err-lines): Filter out errors occurring in different
files.
Diffstat (limited to 'lisp/progmodes/flymake.el')
-rw-r--r-- | lisp/progmodes/flymake.el | 8 |
1 files 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)) |