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

[Kazu Yamamoto ( 山本和彦 )]

From: KOIE Hidetaka (鯉江英隆) <hide at example.com>
Subject: [mew-dist 20276] Re: error in insert-file-contents

> こっちの修正でエラーが飛んでこなくなりました。
> 
> Index: mew-encode.el
> ===================================================================
> RCS file: /cvsmew/mew/mew-encode.el,v
> retrieving revision 1.46
> diff -u -b -F^( -r1.46 mew-encode.el
> --- mew-encode.el	2002/02/04 08:32:58	1.46
> +++ mew-encode.el	2002/02/18 09:48:19
> @@ -627,11 +627,12 @@ (defun mew-encode-mime-body (ctl cte fil
>  	  (mew-convert-message))))
>       ((and (mew-case-equal cte mew-b64) (fboundp 'base64-encode-region))
>        (unless textp
> +        (let ((auto-image-file-mode nil)) ;; for Emacs 21
>  	(mew-frwlet
>  	 (if linebasep mew-cs-text-for-read mew-cs-binary)
>  	 mew-cs-dummy
>  	 (let (format-alist)
> -	   (insert-file-contents file))))
> +             (insert-file-contents file)))))
>        (when linebasep
>  	(goto-char beg)
>  	(while (search-forward "\n" nil t) (replace-match "\r\n" nil t)))

このパッチの意図が読み取れません。どういうことでしょうか？

--かず