Mapping voices onto faces

[Pierre Lorenzon]

Hi,

The operation associating a voice to a face is done using the
variable speechd-face-voices in speechd-el. The variable
speechd-face-voices is an alist whose car of each element is a
face. When testing (line 963 in speechd.el (cvs version)),
match is done against result of (get-text-property point 'face)
assuming that it returns a face ! But it seems that in certain
cases a list of faces might be returned e.g. in a LaTeX file I
have : (get-text-property (point) 'face) =>
(font-lock-keyword-face font-latex-sedate-face). 

Even if one of these two faces has a corresponding voice in the
speechd-face-voices alist ; the list returned above cannot be
identified as a key in the alist hence no mapping is done ! 

So what should we do ? Improve slightly the code in speechd.el
so that it can handle list of faces ? Or are these list of
faces something pathological that should not append ?

Configuration : emacs 22, auctex 11.84 speechd-el (last cvs
version.) 

Regards

Pierre