emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/ivy-hydra f8eb450 077/395: counsel.el (counsel-register


From: Basil L. Contovounesios
Subject: [elpa] externals/ivy-hydra f8eb450 077/395: counsel.el (counsel-register): Fix for file registers in Emacs 27
Date: Thu, 25 Feb 2021 08:31:35 -0500 (EST)

branch: externals/ivy-hydra
commit f8eb45068f64d66cae18ecf50a8cbab69e950305
Author: Matthew Sojourner Newton <matt@mnewton.com>
Commit: Oleh Krehel <ohwoeowho@gmail.com>

    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



reply via email to

[Prev in Thread] Current Thread [Next in Thread]