branch: elpa/workroom
commit a00e8561cb2c06416346b455298bd9f6620b7d8c
Author: Akib Azmain Turja <a...@disroot.org>
Commit: Akib Azmain Turja <a...@disroot.org>
Use 'get-scratch-buffer-create' if defined
---
workroom.el | 6 +++---
1 file changed, 3 insertions(+), 3 deletions(-)
diff --git a/workroom.el b/workroom.el
index abf7944013..65ebd7635c 100644
--- a/workroom.el
+++ b/workroom.el
@@ -1249,9 +1249,9 @@ ACTION and ARGS are also described there."
(pcase (cons action args)
('(:initialize)
(setf (workroom-buffer-manager-data room)
- (list (if (< emacs-major-version 29)
- (get-buffer-create "*scratch*")
- (get-scratch-buffer-create)))))
+ (list (if (fboundp 'get-scratch-buffer-create)
+ (get-scratch-buffer-create)
+ (get-buffer-create "*scratch*")))))
('(:list-buffers)
(workroom-buffer-manager-data room))
(`(:add-buffer ,buffer)
