Commit 50c3a20b authored by Leo Liu's avatar Leo Liu
Browse files

* progmodes/compile.el (compilation-display-error): New command.

(compilation-mode-map, compilation-minor-mode-map): Bind it to
C-o.

Fixes: debbugs:13992
parent 4c9a1377
2013-03-19 Leo Liu <sdl.web@gmail.com>
* progmodes/compile.el (compilation-display-error): New command.
(compilation-mode-map, compilation-minor-mode-map): Bind it to
C-o. (Bug#13992)
2013-03-18 Paul Eggert <eggert@cs.ucla.edu>
 
* term/x-win.el (x-keysym-pair): Add a Fixme (Bug#13936).
......
......@@ -1814,6 +1814,7 @@ Returns the compilation buffer created."
(define-key map [follow-link] 'mouse-face)
(define-key map "\C-c\C-c" 'compile-goto-error)
(define-key map "\C-m" 'compile-goto-error)
(define-key map "\C-o" 'compilation-display-error)
(define-key map "\C-c\C-k" 'kill-compilation)
(define-key map "\M-n" 'compilation-next-error)
(define-key map "\M-p" 'compilation-previous-error)
......@@ -1858,6 +1859,7 @@ Returns the compilation buffer created."
(define-key map [follow-link] 'mouse-face)
(define-key map "\C-c\C-c" 'compile-goto-error)
(define-key map "\C-m" 'compile-goto-error)
(define-key map "\C-o" 'compilation-display-error)
(define-key map "\C-c\C-k" 'kill-compilation)
(define-key map "\M-n" 'compilation-next-error)
(define-key map "\M-p" 'compilation-previous-error)
......@@ -2299,6 +2301,12 @@ Prefix arg N says how many files to move backwards (or forwards, if negative)."
(interactive "p")
(compilation-next-file (- n)))
(defun compilation-display-error ()
"Display the source for current error in another window."
(interactive)
(setq compilation-current-error (point))
(next-error-no-select 0))
(defun kill-compilation ()
"Kill the process made by the \\[compile] or \\[grep] commands."
(interactive)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment