Mercurial > hg > xemacs-beta

diff lisp/w3/mm.el @ 118:7d55a9ba150c r20-1b11

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-1b11
author cvs
date Mon, 13 Aug 2007 09:24:17 +0200
parents 9f59509498e1
children d2f30a177268
line wrap: on
line diff
--- a/lisp/w3/mm.el	Mon Aug 13 09:23:08 2007 +0200
+++ b/lisp/w3/mm.el	Mon Aug 13 09:24:17 2007 +0200
@@ -184,7 +184,7 @@
 		      ("x-mpeg" . (("viewer" . "maplay %s")
 				   ("type"   . "audio/x-mpeg")))
 		      (".*" . (("viewer" . mm-play-sound-file)
-			       ("test"     . (or (featurep 'nas-sound)
+			       ("test"   . (or (featurep 'nas-sound)
 					       (featurep 'native-sound)))
 			       ("type"   . "audio/*")))
 		      (".*" . (("viewer" . "showaudio")
@@ -1082,7 +1082,7 @@
   (setq buff (or buff (current-buffer)))
   (let ((fname (mm-generate-unique-filename "%s.au"))
 	(synchronous-sounds t))		; Play synchronously
-    (mm-write-region-no-coding-system (point-min) (point-max) fname)
+    (mule-write-region-no-coding-system (point-min) (point-max) fname)
     (kill-buffer (current-buffer))
     (play-sound-file fname)
     (condition-case ()