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

[Mitsugu SAKAMOTO <mitsugu@argv.org>]

坂本です。

もうぜんぜんこの話題についていけていないのですが。

From: Reiko TAKAHASHI <HFC03614@...> (高橋玲子)
Subject: Re: [bep] ファイルを結合するマクロ <Re: ミューをダウンロードしましたが・・・。
Date: Thu, 21 Jun 2001 20:31:13 +0900

> (defun append-buffer-to-file (filename)   
>   (interactive "Ffilename: ")
>   (save-excursion)
>   (let 
>       ((coding-system-for-write 'shift_jis-dos))
>     (append-to-file 
>      (point-min) 
>      (point-max) 
>      filename)))

> ……(^_^)。ただ、BEPだと"filename: "のプロンプトはしゃべってくれない……
> ですよね？　これをしゃべらせるようにする裏技ってあるでしょうか？

(defadvice apend-buffer-to-filename (after emacspeak pre act)
	"speak the current line" 
	(emacspeak-speak-line))

かなあ。

なお、emacs-lisp-modeで書いてないので、インデントはめちゃくちゃです。ご
容赦を。

--- Mitsugu