branch: externals/consult
commit 67fa3a253e838fe496a2376123a867d8ba15f857
Author: Daniel Mendler <m...@daniel-mendler.de>
Commit: Daniel Mendler <m...@daniel-mendler.de>
consult-register-store: Add support to create file register value
See #449
---
consult-register.el | 3 ++-
1 file changed, 2 insertions(+), 1 deletion(-)
diff --git a/consult-register.el b/consult-register.el
index 873cbde..c0e5fb8 100644
--- a/consult-register.el
+++ b/consult-register.el
@@ -257,7 +257,8 @@ number. Otherwise store point, frameset, window or kmacro."
(t
`("Store"
(?p "point" "Point to register: " ,#'point-to-register)
- (?f "frameset" "Frameset to register: " ,#'frameset-to-register)
+ (?f "file" "File to register: " ,(lambda (r) (set-register r `(file .
,(buffer-file-name)))))
+ (?t "frameset" "Frameset to register: " ,#'frameset-to-register)
(?w "window" "Window to register: " ,#'window-configuration-to-register)
,@(and last-kbd-macro `((?k "kmacro" "Kmacro to register: "
,#'kmacro-to-register))))))))
