diff options
Diffstat (limited to '.config/emacs')
| -rw-r--r-- | .config/emacs/init.el | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/.config/emacs/init.el b/.config/emacs/init.el index 7ce7b11..3fe49c6 100644 --- a/.config/emacs/init.el +++ b/.config/emacs/init.el @@ -200,6 +200,10 @@ Raise a user error if the command fails. Heed `my/run-strip-newline'." See `my/run' for details, e.g. status handling and output massaging." (my/kill (apply 'my/run program args))) +(defun my/kill-char (c) + (interactive (list (read-char-by-name "Codepoint? " t))) + (my/kill (string c))) + (defun my/kill-date (date format) (interactive (if current-prefix-arg @@ -306,7 +310,8 @@ list and require no escaping." (my/define-prefix-command my/kill-map "Keymap for adding things to the kill ring." - '(("d" my/kill-date) + '(("C" my/kill-char) + ("d" my/kill-date) ("f" my/kill-filename) ("|" my/kill-pipe-region) ("!" my/kill-shell))) |