diff lisp/mel/mel-u.el @ 173:8eaf7971accc r20-3b13

Import from CVS: tag r20-3b13
author cvs
date Mon, 13 Aug 2007 09:49:09 +0200
parents fe104dbd9147
children 6075d714658b
line wrap: on
line diff
--- a/lisp/mel/mel-u.el	Mon Aug 13 09:47:55 2007 +0200
+++ b/lisp/mel/mel-u.el	Mon Aug 13 09:49:09 2007 +0200
@@ -4,7 +4,7 @@
 
 ;; Author: MORIOKA Tomohiko <morioka@jaist.ac.jp>
 ;; Created: 1995/10/25
-;; Version: $Id: mel-u.el,v 1.3 1997/03/16 03:05:15 steve Exp $
+;; Version: $Id: mel-u.el,v 1.4 1997/07/13 22:41:32 steve Exp $
 ;; Keywords: uuencode
 
 ;; This file is part of MEL (MIME Encoding Library).
@@ -84,6 +84,10 @@
 		  t nil nil (cdr uuencode-external-decoder))
 	   (setq filename (expand-file-name filename mime-temp-directory))
 	   (as-binary-input-file (insert-file-contents filename))
+	   ;; The previous line causes the buffer to be made read-only, I
+	   ;; do not pretend to understand the control flow leading to this
+	   ;; but suspect it has something to do with image-mode. -slb
+	   (setq buffer-read-only nil)
 	   (delete-file filename)
 	   ))
       )))