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

project-recompile: New command

Browse source 
* lisp/progmodes/project.el (project-recompile):
New command (bug#68570).
This commit is contained in:
Dmitry Gutov 2024-01-21 07:08:11 +02:00
parent cc8d4b0c91
commit 0a07603ae8
1 changed files with 13 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

13
lisp/progmodes/project.el
View file

@ -1363,6 +1363,7 @@ If you exit the `query-replace', you can later continue the
(defvar compilation-read-command)
(declare-function compilation-read-command "compile")
(declare-function recompile "compile")
(defun project-prefixed-buffer-name (mode)
(concat "*"
@ -1396,6 +1397,18 @@ If non-nil, it overrides `compilation-buffer-name-function' for
compilation-buffer-name-function)))
(call-interactively #'compile)))
(defun project-recompile (&optional edit-command)
"Run `recompile' with appropriate buffer."
(declare (interactive-only recompile))
(interactive "P")
(let ((compilation-buffer-name-function
(or project-compilation-buffer-name-function
;; Should we error instead? When there's no
;; project-specific naming, there is no point in using
;; this command.
compilation-buffer-name-function)))
(recompile edit-command)))
(defcustom project-ignore-buffer-conditions nil
"List of conditions to filter the buffers to be switched to.
If any of these conditions are satisfied for a buffer in the