Re: [bep] ファイルを結合するマクロ <Re: ミューをダウンロードしましたが・・・。

[Koichi INOUE <inoue@argv.org>]

井上です。
今朝ちょっと気になってたのですが、

Koichi INOUE <inoue@...> writes:

> 今なら、
> (append-to-file START END FILENAME)
> という呼び出し形式が理解できると思うので、
> defunで引数filenameを持つ関数をつくって、
> (interactive "Fappend file name: ")
> としてユーザにファイル名入力を求めて、
> (append-to-file (point-min) (point-max) filename)
> とするだけのような気がします。
> いかがでしょう？

これですが、おそらく、append-to-fileする部分を
(let ((coding-system-for-write 'shift_jis-dos))
...)
で囲んだ方がいいと思います。
そうでないと、場合によってShift_JISとJISの混じったファイルを作ってしまっ
たりしそうです。

-- 
                    Koichi Inoue, ARGV
                    E-Mail: inoue@...
                    ICQ UIN: 74900690