about summary refs log tree commit diff
diff options
context:
space:
mode:
-rw-r--r--emacs.d/init-functions.el4
1 files changed, 4 insertions, 0 deletions
diff --git a/emacs.d/init-functions.el b/emacs.d/init-functions.el
index c15b27248ebf..09ffe1777230 100644
--- a/emacs.d/init-functions.el
+++ b/emacs.d/init-functions.el
@@ -73,6 +73,10 @@
     (dotimes (_ (- 80 col (length prefix) (length postfix))) (insert "u"))
     (insert postfix)))
 
+(defun speak (m &optional voice)
+  (shell-command (if 'voice (concat "say " m)
+		   (concat "say -v " voice " " m))))
+
 ;; Reconnect rcirc
 (eval-after-load 'rcirc
   '(defun-rcirc-command reconnect (arg)