branch: externals/ivy-hydra
commit 8383dd613adb065cc1c0c25f49efe9483ede54e3
Author: Basil L. Contovounesios <[email protected]>
Commit: Basil L. Contovounesios <[email protected]>
* counsel.el: Unquote lambda actions
---
counsel.el | 12 ++++++------
1 file changed, 6 insertions(+), 6 deletions(-)
diff --git a/counsel.el b/counsel.el
index 60ff8a1..5b147ca 100644
--- a/counsel.el
+++ b/counsel.el
@@ -2279,10 +2279,10 @@
https://www.freedesktop.org/wiki/Specifications/desktop-bookmark-spec";))
(ivy-set-actions
'counsel-recentf
- '(("j" find-file-other-window "other window")
+ `(("j" find-file-other-window "other window")
("f" find-file-other-frame "other frame")
("x" counsel-find-file-extern "open externally")
- ("d" (lambda (file) (setq recentf-list (delete file recentf-list)))
+ ("d" ,(lambda (file) (setq recentf-list (delete file recentf-list)))
"delete from recentf")))
(defun counsel-recentf-candidates ()
@@ -2471,12 +2471,12 @@ current value of `default-directory'."
:action #'dired))
(ivy-set-actions 'counsel-bookmarked-directory
- '(("j" dired-other-window "other window")
+ `(("j" dired-other-window "other window")
("x" counsel-find-file-extern "open externally")
("r" counsel-find-file-as-root "open as root")
- ("f" (lambda (dir)
- (let ((default-directory dir))
- (call-interactively #'find-file)))
+ ("f" ,(lambda (dir)
+ (let ((default-directory dir))
+ (call-interactively #'find-file)))
"find-file")))
;;** `counsel-file-register'
