From 29c99d4d25875784e45b274690dc6bf463ab864b Mon Sep 17 00:00:00 2001 From: morioka Date: Sun, 11 Jan 1998 17:22:45 +0000 Subject: [PATCH] MEL 6.10.1. --- mel-u.el | 11 +++++++++-- 1 file changed, 9 insertions(+), 2 deletions(-) diff --git a/mel-u.el b/mel-u.el index 0fab184..fda849f 100644 --- a/mel-u.el +++ b/mel-u.el @@ -4,7 +4,7 @@ ;; Author: MORIOKA Tomohiko ;; Created: 1995/10/25 -;; Version: $Id: mel-u.el,v 5.7 1997/03/10 15:15:09 morioka Exp $ +;; Version: $Id: mel-u.el,v 5.10 1997/07/14 21:47:48 morioka Exp $ ;; Keywords: uuencode ;; This file is part of MEL (MIME Encoding Library). @@ -84,7 +84,14 @@ variable `uuencode-external-decoder'." t nil nil (cdr uuencode-external-decoder)) (setq filename (expand-file-name filename mime-temp-directory)) (as-binary-input-file (insert-file-contents filename)) - (delete-file 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 + ;; Use `inhibit-read-only' to avoid to force + ;; buffer-read-only nil. - tomo. + (let ((inhibit-read-only t)) + (delete-file filename) + ) )) ))) -- 1.7.10.4