Index: lisp/dtk-speak.el
===================================================================
--- lisp/dtk-speak.el (revision 8421)
+++ lisp/dtk-speak.el (working copy)
@@ -610,8 +610,11 @@
(defsubst dtk-speak-using-voice (voice text)
"Use voice VOICE to speak text TEXT."
- (declare (special tts-voice-reset-code))
+ (declare (special dtk-quiet dtk-speak-server-initialized
+ tts-voice-reset-code))
(unless (or (eq 'inaudible voice )
+ dtk-quiet
+ (not dtk-speak-server-initialized)
(and (listp voice)
(member 'inaudible voice)))
(dtk-interp-queue-code
If you have questions about this archive or had problems using it, please send mail to:
priestdo@xxxxxxxxxxx No Soliciting!Emacspeak List Archive | 2010 | 2009 | 2008 | 2007 | 2006 | 2005 | 2004 | 2003 | 2002 | 2001 | 2000 | 1999 | 1998 | Pre 1998