branch: externals/embark
commit ab1ee58dcc31e5c88428a7e258c12510f68b6898
Author: Omar Antolín <omar.anto...@gmail.com>
Commit: Omar Antolín <omar.anto...@gmail.com>
Missed a spot in the documentation clean up
---
README.org | 6 ++----
embark.texi | 6 ++----
2 files changed, 4 insertions(+), 8 deletions(-)
diff --git a/README.org b/README.org
index 87b2107..4697934 100644
--- a/README.org
+++ b/README.org
@@ -574,8 +574,7 @@ metadata looks:
(defun my-select-tab-by-name (tab)
(interactive
(list
- (let ((tab-list (or (mapcar #'(lambda (tab)
- (cdr (assq 'name tab)))
+ (let ((tab-list (or (mapcar (lambda (tab) (cdr (assq 'name tab)))
(tab-bar-tabs))
(user-error "No tabs found"))))
(completing-read
@@ -598,8 +597,7 @@ follows:
(defun my-select-tab-by-name (tab)
(interactive
(list
- (let ((tab-list (or (mapcar #'(lambda (tab)
- (cdr (assq 'name tab)))
+ (let ((tab-list (or (mapcar (lambda (tab) (cdr (assq 'name tab)))
(tab-bar-tabs))
(user-error "No tabs found"))))
(consult--read tab-list
diff --git a/embark.texi b/embark.texi
index f5635ae..93c452e 100644
--- a/embark.texi
+++ b/embark.texi
@@ -718,8 +718,7 @@ metadata looks:
(defun my-select-tab-by-name (tab)
(interactive
(list
- (let ((tab-list (or (mapcar #'(lambda (tab)
- (cdr (assq 'name tab)))
+ (let ((tab-list (or (mapcar (lambda (tab) (cdr (assq 'name tab)))
(tab-bar-tabs))
(user-error "No tabs found"))))
(completing-read
@@ -742,8 +741,7 @@ follows:
(defun my-select-tab-by-name (tab)
(interactive
(list
- (let ((tab-list (or (mapcar #'(lambda (tab)
- (cdr (assq 'name tab)))
+ (let ((tab-list (or (mapcar (lambda (tab) (cdr (assq 'name tab)))
(tab-bar-tabs))
(user-error "No tabs found"))))
(consult--read tab-list
