Re: [Erc-help] erc-play-sound

[Mario L. <ml...@ho...>]

Adam Duck <du...@in...> writes:

> Well, I don't have write-access to CVS and I also don't know what to
> do with it if I had it. I've inserted some code into `erc-play-sound'
> that makes my life with XEmacs on WinXP easier...
> 
>     (cond ((and filepath (file-exists-p filepath))
> 	   (if (and (boundp (device-sound-enabled-p))
depending on if in XEmacs, device-sound-enabled-p is a function or a variable,
I am 1quite sure you want to do either:
(boundp 'device-sound-enabled-p)
or
(fboundp 'device-sound-enabled-p)

Your code returns t in all cases,
because it checks if either t or nil, the return values
or device-sound-enabled-p are bound, And t and nil are always
bound in emacs lisp.

so, question remaining is: If device-sound-enabled-p a function, or a variable?

> 		    (device-sound-enabled-p))
> 	       (play-sound-file filepath)

another remaining question is: do you really want this? I mean, is play-sound-file in XEmacs non-blocking, or not? If not, be warned
that emacs is unresponsive while the soundfile is played.

-- 
CYa,
   Mario <ml...@de...>
Homepage(s): http://delysid.org | http://piss.at/

"I don't think so," said Ren'e Descartes.  Just then, he vanished.