From d2f956807e87d1a4797a8686725912c780061a58 Mon Sep 17 00:00:00 2001 From: Dmitry Gutov Date: Sat, 12 Nov 2022 03:34:41 +0200 Subject: [PATCH] project--buffer-list: Remove as unused * lisp/progmodes/project.el (project--buffer-list): Remove as unused (pointed out in bug#59153 by Juri). --- lisp/progmodes/project.el | 15 --------------- 1 file changed, 15 deletions(-) diff --git a/lisp/progmodes/project.el b/lisp/progmodes/project.el index fc035675cec..d2ce684c1ba 100644 --- a/lisp/progmodes/project.el +++ b/lisp/progmodes/project.el @@ -1283,21 +1283,6 @@ Used by `project-kill-buffers'." :package-version '(project . "0.8.2") :safe #'booleanp) -(defun project--buffer-list (pr) - "Return the list of all buffers in project PR." - (let ((conn (file-remote-p (project-root pr))) - bufs) - (dolist (buf (buffer-list)) - ;; For now we go with the assumption that a project must reside - ;; entirely on one host. We might relax that in the future. - (when (and (equal conn - (file-remote-p (buffer-local-value 'default-directory buf))) - (equal pr - (with-current-buffer buf - (project-current)))) - (push buf bufs))) - (nreverse bufs))) - (defun project--buffer-check (buf conditions) "Check if buffer BUF matches any element of the list CONDITIONS. See `project-kill-buffer-conditions' or -- 2.39.5