[elpa] externals/greader 3669ca8 24/76: function greader-speechd-set-language added.

[Stefan Monnier]

branch: externals/greader
commit 3669ca8174efc28db694aca04b2bf0f308fdc813
Author: Michelangelo Rodriguez <address@hidden>
Commit: Michelangelo Rodriguez <address@hidden>

    function greader-speechd-set-language added.
---
 greader-speechd.el | 8 ++++++++
 1 file changed, 8 insertions(+)

diff --git a/greader-speechd.el b/greader-speechd.el
index 994ef20..a608b19 100644
--- a/greader-speechd.el
+++ b/greader-speechd.el
@@ -45,3 +45,11 @@
   "tries to find speech-dispatcher client using greader-speechd-executable as 
basename."
 (locate-file greader-speechd-executable exec-path))
 
+(defun greader-speechd-set-language
+    (&optional lang)
+  "sets language 'lang' for speech-dispatcher client.
+if lang is omitted, it looks in variable greader-speechd-language and 
retrieves the appropriate string used by spd-say or another client compatible."
+  (if (not lang)
+    (concat "-l " greader-speechd-language)
+    (concat "-l " lang)))
+