# HG changeset patch
# User Stefan Monnier <monnier@iro.umontreal.ca>
# Date 1084928954 0
# Node ID 197b3ee77f2cb4f8b91145a5e288a73cd2a33a1f
# Parent  839ccd7aaee007ce7da6fdc70ea7614e6e6a92c0
(mm-insert-inline): Make it work in read-only buffer.

diff -r 839ccd7aaee0 -r 197b3ee77f2c lisp/gnus/mm-view.el
--- a/lisp/gnus/mm-view.el	Wed May 19 00:56:46 2004 +0000
+++ b/lisp/gnus/mm-view.el	Wed May 19 01:09:14 2004 +0000
@@ -1,5 +1,5 @@
 ;;; mm-view.el --- functions for viewing MIME objects
-;; Copyright (C) 1998, 1999, 2000, 2001 Free Software Foundation, Inc.
+;; Copyright (C) 1998, 1999, 2000, 01, 2004  Free Software Foundation, Inc.
 
 ;; Author: Lars Magne Ingebrigtsen <larsi@gnus.org>
 ;; This file is part of GNU Emacs.
@@ -197,7 +197,8 @@
 
 (defun mm-insert-inline (handle text)
   "Insert TEXT inline from HANDLE."
-  (let ((b (point)))
+  (let ((b (point))
+	(inhibit-read-only t))
     (insert text)
     (mm-handle-set-undisplayer
      handle