branch: externals/ivy-hydra
commit f8eb45068f64d66cae18ecf50a8cbab69e950305
Author: Matthew Sojourner Newton <[email protected]>
Commit: Oleh Krehel <[email protected]>
counsel.el (counsel-register): Fix for file registers in Emacs 27
Fixes #2370
---
counsel.el | 10 +++++-----
1 file changed, 5 insertions(+), 5 deletions(-)
diff --git a/counsel.el b/counsel.el
index 473d13e..67b0273 100644
--- a/counsel.el
+++ b/counsel.el
@@ -4206,14 +4206,14 @@ Note: Duplicate elements of `kill-ring' are always
deleted."
;;** `counsel-register'
(defvar counsel-register-actions
- '(("\\`buffer position" . jump-to-register)
+ '(("\\`buffer" . jump-to-register)
("\\`text" . insert-register)
("\\`rectangle" . insert-register)
- ("\\`window configuration" . jump-to-register)
- ("\\`frame configuration" . jump-to-register)
+ ("\\`window" . jump-to-register)
+ ("\\`frame" . jump-to-register)
("\\`[-+]?[0-9]+\\(?:\\.[0-9]\\)?\\'" . insert-register)
- ("\\`the file" . jump-to-register)
- ("\\`keyboard macro" . jump-to-register)
+ ("\\`\\(?:the \\)?file " . jump-to-register)
+ ("\\`keyboard" . jump-to-register)
("\\`file-query" . jump-to-register))
"Alist of (REGEXP . FUNCTION) pairs for `counsel-register'.
Selecting a register whose description matches REGEXP specifies
