[mew-int 00396] A bug fix for HTML

[Kazu Yamamoto ( 山本和彦 )]

Due to my careless mistake, you need to apply the following patch to
pre4 to display HTML which is directly contained in a body.

--Kazu

Index: mew-mime.el
===================================================================
RCS file: /cvsroot/mew/mew/mew-mime.el,v
retrieving revision 1.31
diff -c -r1.31 mew-mime.el
*** mew-mime.el	2001/07/22 01:08:17	1.31
--- mew-mime.el	2001/07/22 23:06:04
***************
*** 194,202 ****
    (if (and (symbolp mew-prog-text/html) (fboundp mew-prog-text/html))
        (save-excursion
  	(mew-elet
! 	 (insert
! 	  (save-excursion (set-buffer cache) (mew-buffer-substring begin end)))
! 	 (funcall mew-prog-text/html (point-min) (point-max))))
      (mew-elet
       (insert " #     # ####### #     # #\n"
  	     " #     #    #    ##   ## #\n"
--- 194,204 ----
    (if (and (symbolp mew-prog-text/html) (fboundp mew-prog-text/html))
        (save-excursion
  	(mew-elet
! 	 (let ((start (point)))
! 	   (insert
! 	    (save-excursion
! 	      (set-buffer cache) (mew-buffer-substring begin end)))
! 	   (funcall mew-prog-text/html start (point-max)))))
      (mew-elet
       (insert " #     # ####### #     # #\n"
  	     " #     #    #    ##   ## #\n"