diff options
author | Dmitry Gutov <dgutov@yandex.ru> | 2020-06-26 03:27:39 +0300 |
---|---|---|
committer | Dmitry Gutov <dgutov@yandex.ru> | 2020-06-26 03:43:14 +0300 |
commit | beaff813e1f744c93b7f40020f88dae1ef797596 (patch) | |
tree | e966e781ffa8b89b84f8a13efb6f6b473e4bad66 | |
parent | 511ddaaed09c39f7bffa357727df4d02df903a3c (diff) | |
download | emacs-beaff813e1f744c93b7f40020f88dae1ef797596.tar.gz |
Rename project-kill-buffers-{skip-conditions,ignores}
* lisp/progmodes/project.el (project-kill-buffers-ignores):
Rename from project-kill-buffers-skip-conditions (bug#41868).
Update both references.
Add a :package-version attribute.
-rw-r--r-- | lisp/progmodes/project.el | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/lisp/progmodes/project.el b/lisp/progmodes/project.el index 42715dc9dcf..e1adabd2f97 100644 --- a/lisp/progmodes/project.el +++ b/lisp/progmodes/project.el @@ -823,7 +823,7 @@ is inside the directory hierarchy of the project's root." nil predicate)))) -(defcustom project-kill-buffers-skip-conditions +(defcustom project-kill-buffers-ignores '("\\*Help\\*") "Conditions for buffers `project-kill-buffers' should not kill. Each condition is either a regular expression matching a buffer @@ -831,7 +831,8 @@ name, or a predicate function that takes a buffer object as argument and returns non-nil if it matches. Buffers that match any of the conditions will not be killed." :type '(repeat (choice regexp function)) - :version "28.1") + :version "28.1" + :package-version '(project . "0.5.0")) (defun project--buffer-list (pr) "Return the list of all buffers in project PR." @@ -847,7 +848,7 @@ any of the conditions will not be killed." ;;;###autoload (defun project-kill-buffers () "Kill all live buffers belonging to the current project. -Certain buffers may be \"spared\", see `project-kill-buffers-skip-conditions'." +Certain buffers may be \"spared\", see `project-kill-buffers-ignores'." (interactive) (let ((pr (project-current t)) bufs) (dolist (buf (project--buffer-list pr)) @@ -857,7 +858,7 @@ Certain buffers may be \"spared\", see `project-kill-buffers-skip-conditions'." (string-match-p c (buffer-name buf))) ((functionp c) (funcall c buf)))) - project-kill-buffers-skip-conditions) + project-kill-buffers-ignores) (push buf bufs))) (when (yes-or-no-p (format "Kill %d buffers in %s? " (length bufs) (project-root pr))) |