Mercurial > emacs

changeset 55680:197b3ee77f2c

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(mm-insert-inline): Make it work in read-only buffer.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Wed, 19 May 2004 01:09:14 +0000
parents 839ccd7aaee0
children 91c18484e1a2
files lisp/gnus/mm-view.el
diffstat 1 files changed, 3 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- 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