branch: externals/hyperbole
commit 31d4095d053377483f2a2522f38c4ad210855d71
Author: Mats Lidell <mats.lid...@lidells.se>
Commit: GitHub <nore...@github.com>
Add hycontrol-blank-buffer-name and make it customizable (#488)
---
ChangeLog | 5 +++++
hycontrol.el | 11 +++++++++--
2 files changed, 14 insertions(+), 2 deletions(-)
diff --git a/ChangeLog b/ChangeLog
index 9492029400..9586426f01 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2024-03-15 Mats Lidell <ma...@gnu.org>
+
+* hycontrol.el (hycontrol-blank-buffer-name): Make name of the blank
+ buffer customizable.
+
2024-03-14 Mats Lidell <ma...@gnu.org>
* test/hyrolo-tests.el (hyrolo-tests--goto-org-match)
diff --git a/hycontrol.el b/hycontrol.el
index 51a478f585..acf31c8680 100644
--- a/hycontrol.el
+++ b/hycontrol.el
@@ -3,7 +3,7 @@
;; Author: Bob Weiner
;;
;; Orig-Date: 1-Jun-16 at 15:35:36
-;; Last-Mod: 18-Feb-24 at 12:42:03 by Mats Lidell
+;; Last-Mod: 16-Mar-24 at 00:04:31 by Mats Lidell
;;
;; SPDX-License-Identifier: GPL-3.0-or-later
;;
@@ -241,6 +241,13 @@ The final predicate should always be t, for default
values, typically of zero.")
(< value (display-pixel-width)))))
:group 'hyperbole-screen)
+(defcustom hycontrol-blank-buffer-name " BLANK"
+ "Blank buffer name used for to display in extra window grid windows.
+Used after selected buffer list is exhausted. Start name with a space
+for it to be omitted by `list-buffers'."
+ :type 'string
+ :group 'hyperbole-screen)
+
(defvar hycontrol-frame-widths
'(1.0 0.75 0.666 0.5 0.333 0.25)
"List of width percentages to cycle through when adjusting a frame's width.
@@ -891,7 +898,7 @@ multiple of the default frame font width."
hycontrol-display-buffer-predicate-list)
(error "(HyDebug): Invalid expression in
`hycontrol-display-buffer-predicate-list' - %s" err)))
-(defvar hycontrol--blank-buffer (get-buffer-create " BLANK")
+(defvar hycontrol--blank-buffer (get-buffer-create hycontrol-blank-buffer-name)
"Blank buffer to display in extra window grid windows.
Used after selected buffer list is exhausted.")
