[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/beframe 878cc6a890 07/14: Rename private functions for
From: |
ELPA Syncer |
Subject: |
[elpa] externals/beframe 878cc6a890 07/14: Rename private functions for consistency |
Date: |
Mon, 13 Feb 2023 09:57:23 -0500 (EST) |
branch: externals/beframe
commit 878cc6a890207f73349f32e375cd772c472f9c04
Author: Protesilaos Stavrou <info@protesilaos.com>
Commit: Protesilaos Stavrou <info@protesilaos.com>
Rename private functions for consistency
---
framed-buffers.el | 26 +++++++++++++-------------
1 file changed, 13 insertions(+), 13 deletions(-)
diff --git a/framed-buffers.el b/framed-buffers.el
index 93735a39e2..d9973b8b47 100644
--- a/framed-buffers.el
+++ b/framed-buffers.el
@@ -58,7 +58,7 @@ Otherwise framed buffers are limited to the frame that uses
them."
(get-buffer name))
framed-buffers-global-buffers))
-(defun framed-buffers-buffer-list (&optional frame)
+(defun framed-buffers--buffer-list (&optional frame)
"Return list of buffers that are used by the current frame.
With optional FRAME as an object that satisfies `framep', return
the list of buffers that are used by FRAME.
@@ -68,6 +68,14 @@ Include `framed-buffers-global-buffers' in the list."
(append (framed-buffers--frame-buffer-list frame)
(framed-buffers--global-buffer-list))))
+(defun framed-buffers--buffer-names (&optional frame)
+ "Return list of names of `framed-buffers--buffer-list' as strings.
+With optional FRAME, do it for the given frame name."
+ (mapcar
+ (lambda (buf)
+ (buffer-name buf))
+ (framed-buffers--buffer-list frame)))
+
(defun framed-buffers--read-buffer-p (buf &optional frame)
"Return non-nil if BUF belongs to the current FRAME.
BUF is a string or a cons cell, per `framed-buffers-read-buffer'.
@@ -93,14 +101,6 @@ per-frame filter."
'buffer-name-history
def))
-(defun framed-buffers--buffer-names (&optional frame)
- "Return list of names of `framed-buffers-buffer-list' as strings.
-With optional FRAME, do it for the given frame name."
- (mapcar
- (lambda (buf)
- (buffer-name buf))
- (framed-buffers-buffer-list frame)))
-
(defun framed-buffers--buffer-prompt (&optional frame)
"Prompt for buffer among `framed-buffers--buffer-names'.
@@ -204,8 +204,8 @@ Add this to `after-make-frame-functions'."
(defun framed-buffers--frame-parameter-p (buf)
"Return non-nil if BUF belongs to the current frame.
-BUF is a buffer object among `framed-buffers-buffer-list'."
- (memq buf (framed-buffers-buffer-list)))
+BUF is a buffer object among `framed-buffers--buffer-list'."
+ (memq buf (framed-buffers--buffer-list)))
(defun framed-buffers--frame-predicate (&optional frame)
"Set FRAME `buffer-predicate' parameter.
@@ -229,13 +229,13 @@ If FRAME is nil, use the current frame."
;; needed for `consult-buffer' and maybe others, but there may
;; be a better way.
;;
- ;; (advice-add #'buffer-list :override #'framed-buffers-buffer-list)
+ ;; (advice-add #'buffer-list :override #'framed-buffers--buffer-list)
)
(setq read-buffer-function framed-buffers--read-buffer-function
framed-buffers--read-buffer-function nil)
(remove-hook 'after-make-frame-functions #'framed-buffers--frame-predicate)
(remove-hook 'after-make-frame-functions #'framed-buffers--rename-frame)
- ;; (advice-remove #'buffer-list #'framed-buffers-buffer-list)
+ ;; (advice-remove #'buffer-list #'framed-buffers--buffer-list)
))
(provide 'framed-buffers)
- [elpa] externals/beframe 42e988c5b3 04/14: Add user option framed-buffers-global-buffers, (continued)
- [elpa] externals/beframe 42e988c5b3 04/14: Add user option framed-buffers-global-buffers, ELPA Syncer, 2023/02/13
- [elpa] externals/beframe 2bdeb35e98 01/14: Add framed-buffers prototype, ELPA Syncer, 2023/02/13
- [elpa] externals/beframe 97f50f5c7e 02/14: Fix and simplify framed-buffers--rename-frame, ELPA Syncer, 2023/02/13
- [elpa] externals/beframe 0ea7299ef2 09/14: Add 'consult' integration, ELPA Syncer, 2023/02/13
- [elpa] externals/beframe 9e102cffac 10/14: Remove obsolete code, ELPA Syncer, 2023/02/13
- [elpa] externals/beframe 87d0c0cb63 14/14: BREAKING rename project to "reframe", ELPA Syncer, 2023/02/13
- [elpa] externals/beframe cfafcda138 13/14: Optional open new projects in their own frame, ELPA Syncer, 2023/02/13
- [elpa] externals/beframe 0b24283ddc 03/14: Remove unused declaration of project.el function, ELPA Syncer, 2023/02/13
- [elpa] externals/beframe 40ddc320eb 08/14: Add bespoke minibuffer history, ELPA Syncer, 2023/02/13
- [elpa] externals/beframe b9173f1efd 05/14: Clarify that frame selection depends on the window manager, ELPA Syncer, 2023/02/13
- [elpa] externals/beframe 878cc6a890 07/14: Rename private functions for consistency,
ELPA Syncer <=
- [elpa] externals/beframe fa46c2f28f 12/14: Rename internal functions, ELPA Syncer, 2023/02/13