diff options
author | jao <jao@gnu.org> | 2022-05-15 20:29:21 +0100 |
---|---|---|
committer | jao <jao@gnu.org> | 2022-05-15 20:29:21 +0100 |
commit | bc27e8119f2c9e9a47a6ad2874c83308cd6c2198 (patch) | |
tree | 39ea35c93825a5d7b5a33be4162b18bce1323609 | |
parent | 41356c145e465d534e95032811e22eadd7ea92f9 (diff) | |
download | elibs-bc27e8119f2c9e9a47a6ad2874c83308cd6c2198.tar.gz elibs-bc27e8119f2c9e9a47a6ad2874c83308cd6c2198.tar.bz2 |
embark: randomsig action
-rw-r--r-- | completion.org | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/completion.org b/completion.org index 9616da6..c653422 100644 --- a/completion.org +++ b/completion.org @@ -389,9 +389,19 @@ (require 'embark-consult))) #+end_src +*** randomsig + #+begin_src emacs-lisp + (defun jao-random-sig-read (_ignored) + "Import region as signature and edit it." + (randomsig-message-read-sig t)) + + (define-key embark-region-map "m" #'jao-random-sig-read) + (define-key embark-region-map "M" #'apply-macro-to-region-lines) + #+end_src *** dict/say #+begin_src emacs-lisp (defun jao-say (&optional word) + "Isn't it nice to have a computer that can talk to you?" (interactive "sWhat? ") (shell-command-to-string (format "say %s" word)) "") |