X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Fmm-view.el;fp=lisp%2Fmm-view.el;h=19e017a8176aa6d83ff619470b0104e4570aefa9;hb=a526b7eba49c81420c8caed38c3bafe0e20cdecb;hp=9f3d0e9e840602e0547f822e8467af73dc5304be;hpb=c3e1fa9581a5bfd59386b25a438fbb6650441f79;p=elisp%2Fgnus.git-

diff --git a/lisp/mm-view.el b/lisp/mm-view.el
index 9f3d0e9..19e017a 100644
--- a/lisp/mm-view.el
+++ b/lisp/mm-view.el
@@ -63,7 +63,7 @@
     (setq mm-w3-setup t)))
 
 (defun mm-inline-text (handle)
-  (let ((type (cadr (split-string (car (mm-handle-type handle)) "/")))
+  (let ((type (mm-handle-media-subtype handle))
 	text buffer-read-only)
     (cond
      ((equal type "html")