procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(recompile): Use compilation-arguments if set, so as to be able to M-x

Browse source 
recompile the exact command which created a compilation-mode buffer.
This commit is contained in:
Richard M. Stallman 2001-11-14 04:23:45 +00:00
parent 10bcf543b7
commit 6867356aba
1 changed files with 5 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
lisp/progmodes/compile.el
View file

@ -580,10 +580,13 @@ to a function that generates a unique name."
;; run compile with the default command line
(defun recompile ()
"Re-compile the program including the current buffer."
"Re-compile the program including the current buffer.
If this is run in a compilation-mode buffer, re-use the arguments from the
original use. Otherwise, it recompiles using `compile-command'."
(interactive)
(save-some-buffers (not compilation-ask-about-save) nil)
(compile-internal (eval compile-command) "No more errors"))
(apply 'compile-internal (or compilation-arguments
`(,(eval compile-command) "No more errors"))))
(defun grep-process-setup ()
"Set up `compilation-exit-message-function' for `grep'."