X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Fgnus-audio.el;h=daa5cf47d3a461d22f60fafbf722a8c43323d92f;hb=9b741e050b400987d68ff761c6cc3276c932839c;hp=ac959e742ad68ec6232041f24b8d2351453bcaca;hpb=a707b63af25b91cb730c12e65156ca364bf49a44;p=elisp%2Fgnus.git- diff --git a/lisp/gnus-audio.el b/lisp/gnus-audio.el index ac959e7..daa5cf4 100644 --- a/lisp/gnus-audio.el +++ b/lisp/gnus-audio.el @@ -32,6 +32,7 @@ (defgroup gnus-audio nil "Playing sound in Gnus." + :version "21.1" :group 'gnus-visual :group 'multimedia) @@ -98,12 +99,12 @@ (expand-file-name file gnus-audio-directory)))) (when (file-exists-p sound-file) (cond ((and gnus-audio-inline-sound - (condition-case nil - ;; Even if we have audio, we may fail with the - ;; wrong sort of sound file. - (progn (play-sound-file sound-file) - t) - (error nil)))) + (condition-case nil + ;; Even if we have audio, we may fail with the + ;; wrong sort of sound file. + (progn (play-sound-file sound-file) + t) + (error nil)))) ;; If we don't have built-in sound, or playing it failed, ;; try with external program. ((equal "wav" (file-name-extension sound-file))