summaryrefslogtreecommitdiffhomepage
diff options
context:
space:
mode:
authorjao <jao@gnu.org>2022-05-15 20:29:21 +0100
committerjao <jao@gnu.org>2022-05-15 20:29:21 +0100
commitbc27e8119f2c9e9a47a6ad2874c83308cd6c2198 (patch)
tree39ea35c93825a5d7b5a33be4162b18bce1323609
parent41356c145e465d534e95032811e22eadd7ea92f9 (diff)
downloadelibs-bc27e8119f2c9e9a47a6ad2874c83308cd6c2198.tar.gz
elibs-bc27e8119f2c9e9a47a6ad2874c83308cd6c2198.tar.bz2
embark: randomsig action
-rw-r--r--completion.org10
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))
"")