andros/emacs-gpu
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

* lisp/progmodes/compile.el (compilation-next-error-function):

Browse source 
Pass "formats" to compilation-find-file.

Fixes: debbugs:11777
This commit is contained in:
Magnus Henoch 2013-04-24 09:50:22 -04:00 • committed by Stefan Monnier
parent 3b8fe7527b
commit 4391916c58
2 changed files with 14 additions and 7 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

11
lisp/ChangeLog
View file

@ -1,3 +1,8 @@
2013-04-24 Magnus Henoch <magnus.henoch@gmail.com>
* progmodes/compile.el (compilation-next-error-function):
Pass "formats" to compilation-find-file (bug#11777).
2013-04-24 Glenn Morris <rgm@gnu.org>
* vc/vc-bzr.el (vc-bzr-print-log):
@ -22,12 +27,12 @@
2013-04-23 Tassilo Horn <tsdh@gnu.org>
* textmodes/reftex-vars.el (reftex-label-regexps): Call
`reftex-compile-variables' after changes to this variable.
* textmodes/reftex-vars.el (reftex-label-regexps):
Call `reftex-compile-variables' after changes to this variable.
2013-04-23 Stefan Monnier <monnier@iro.umontreal.ca>
* jit-lock.el: Fix signals in jit-lock-force-redisplay.
* jit-lock.el: Fix signals in jit-lock-force-redisplay (bug#13542).
Use lexical-binding.
(jit-lock-force-redisplay): Use markers, check buffer's continued
existence and beware narrowed buffers.

10
lisp/progmodes/compile.el
View file

@ -2382,10 +2382,12 @@ This is the value of `next-error-function' in Compilation buffers."
;; (setq timestamp compilation-buffer-modtime)))
)
(with-current-buffer
(compilation-find-file
marker
(caar (compilation--loc->file-struct loc))
(cadr (car (compilation--loc->file-struct loc))))
(apply #'compilation-find-file
marker
(caar (compilation--loc->file-struct loc))
(cadr (car (compilation--loc->file-struct loc)))
(compilation--file-struct->formats
(compilation--loc->file-struct loc)))
(let ((screen-columns
;; Obey the compilation-error-screen-columns of the target
;; buffer if its major mode set it buffer-locally.