diff options
author | Stefan Monnier <monnier@iro.umontreal.ca> | 2004-05-19 01:09:14 +0000 |
---|---|---|
committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2004-05-19 01:09:14 +0000 |
commit | 3c8c8c277e0edc58d4d22d53f3a83e2dc770b0bb (patch) | |
tree | cf113917076a79126faf0dd36f0f48c33b08e19f | |
parent | 933cd61ed486b4900d8771c958f00cffad2f6c48 (diff) | |
download | emacs-3c8c8c277e0edc58d4d22d53f3a83e2dc770b0bb.tar.gz emacs-3c8c8c277e0edc58d4d22d53f3a83e2dc770b0bb.tar.bz2 emacs-3c8c8c277e0edc58d4d22d53f3a83e2dc770b0bb.zip |
(mm-insert-inline): Make it work in read-only buffer.
-rw-r--r-- | lisp/gnus/mm-view.el | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/gnus/mm-view.el b/lisp/gnus/mm-view.el index f7dfdb60f02..69cbd3d8a1d 100644 --- a/lisp/gnus/mm-view.el +++ b/lisp/gnus/mm-view.el @@ -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 |