[mew-dist 20273] Re: error in insert-file-contents

[Kazu Yamamoto ( 山本和彦 )]

From: Hideyuki SHIRAI (白井秀行) <shirai at example.com>
Subject: [mew-dist 20271] Re: error in insert-file-contents

> ここは text 向けだから、633行目の
> 
> 	 (let (format-alist)
> 	   (insert-file-contents file))))
> 
> ってほうじゃないでしょうか？ (という気がします)

そのようです。(_ _)

format-alist だけじゃ、不十分なのかなぁ。

--かず

Index: mew-encode.el
===================================================================
RCS file: /cvsroot/mew/mew/mew-encode.el,v
retrieving revision 1.46
diff -c -r1.46 mew-encode.el
*** mew-encode.el	2002/02/04 08:32:58	1.46
--- mew-encode.el	2002/02/18 09:30:37
***************
*** 630,636 ****
  	(mew-frwlet
  	 (if linebasep mew-cs-text-for-read mew-cs-binary)
  	 mew-cs-dummy
! 	 (let (format-alist)
  	   (insert-file-contents file))))
        (when linebasep
  	(goto-char beg)
--- 630,637 ----
  	(mew-frwlet
  	 (if linebasep mew-cs-text-for-read mew-cs-binary)
  	 mew-cs-dummy
! 	 (let ((format-alist nil)
! 	       (auto-image-file-mode nil)) ;; for Emacs 21
  	   (insert-file-contents file))))
        (when linebasep
  	(goto-char beg)