From: Basil L. Contovounesios <contovob@tcd.ie>
Date: Sat, 18 May 2019 17:06:29 +0000 (+0100)
Subject: Remove XEmacs audio checks from mm-decode.el
X-Git-Tag: emacs-27.0.90~2832
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=63ffb61396042f61705a9ab97fc80515d918c7e5;p=emacs.git

Remove XEmacs audio checks from mm-decode.el

For discussion, see the following threads:
https://lists.gnu.org/archive/html/emacs-devel/2019-03/msg01087.html
https://lists.gnu.org/archive/html/emacs-devel/2019-05/msg00584.html
* lisp/gnus/mm-decode.el (mm-inline-media-tests): Remove no-op media
tests for XEmacs features.
---

diff --git a/lisp/gnus/mm-decode.el b/lisp/gnus/mm-decode.el
index 93b57706f85..5b1859e3240 100644
--- a/lisp/gnus/mm-decode.el
+++ b/lisp/gnus/mm-decode.el
@@ -262,15 +262,6 @@ before the external MIME handler is invoked."
     ("text/.*" mm-inline-text identity)
     ("application/x-.?tar\\(-.*\\)?" mm-archive-dissect-and-inline identity)
     ("application/zip" mm-archive-dissect-and-inline identity)
-    ("audio/wav" mm-inline-audio
-     ,(lambda (_handle)
-       (and (fboundp 'device-sound-enabled-p)
-	    (device-sound-enabled-p))))
-    ("audio/au"
-     mm-inline-audio
-     ,(lambda (_handle)
-       (and (fboundp 'device-sound-enabled-p)
-	    (device-sound-enabled-p))))
     ("application/pgp-signature" ignore identity)
     ("application/x-pkcs7-signature" ignore identity)
     ("application/pkcs7-signature" ignore identity)