martin/emacs
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

(play-sound): Rearrange to avoid warning.

Browse Source
This commit is contained in:
Richard M. Stallman
2005-08-25 10:57:38 +00:00
parent 2ae12bb0da
commit 5a3232180f
1 changed files with 3 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
lisp/subr.el
View File

@@ -2657,9 +2657,9 @@ don't change the volume setting of the sound device.
:device DEVICE - play sound on DEVICE. If not specified,
a system-dependent default device name is used."
(unless (fboundp 'play-sound-internal)
(error "This Emacs binary lacks sound support"))
(play-sound-internal sound))
(if (fboundp 'play-sound-internal)
(play-sound-internal sound)
(error "This Emacs binary lacks sound support")))
(defun define-mail-user-agent (symbol composefunc sendfunc
&optional abortfunc hookvar)