Re: Emacs からスクリプトを使って印刷をする。
>>>>> In <864py8s51j.fsf@bsd2.4bn.ne.jp>
>>>>> Yoshitaka Ikeda <ikeda@4bn.ne.jp> wrote:
> 試してみましたが、まだついたままです。自分でも原因探求してみますが。
以前の記事を読み返して見るに、lpr-add-switches 変数の値が nil で
はないですね? これが nil だと lpr-command の第二引数としてタイ
トルが渡されませんから。このタイトルは "バッファ名 Emacs buffer"
のままです。このことをおっしゃっているのではないですか?
それから、たぶん関係無いですが、lpr-headers-switches 変数の値は
デフォルトの nil ですね?
(defadvice ...) のようなやり方で簡単に対処することは、不可能に思
えてきました。lpr.el を以下のように改造してしまうのが簡単でしょ
う。
--- lpr.el~ 2001-07-15 16:15:34 +0000
+++ lpr.el 2006-06-26 09:29:12 +0000
@@ -199,8 +199,8 @@
;; On some MIPS system, having a space in the job name
;; crashes the printer demon. But using dashes looks ugly
;; and it seems to annoying to do for that MIPS system.
- (let ((name (concat (buffer-name) " Emacs buffer"))
- (title (concat (buffer-name) " Emacs buffer"))
+ (let ((name (buffer-name))
+ (title (buffer-name))
;; Make pipes use the same coding system as
;; writing the buffer to a file would.
(coding-system-for-write (or coding-system-for-write
(変更した後で M-x byte-compile-file して下さい。正規版とは別の場
所に置いて、(load "/some/where/lpr") とするのも良いと思います。)
> #ちなみに、M-x print-bufferだと *spool temp* Emacs buffer になって、
> #M-x lpr-bufferだと print_via_mail.sh Emacs buffer となります。
上記の lpr.el 本体を改造するやり方ならば、lpr-buffer にも効果を
及ぼします。(ちなみに Emacs 21.3 とほぼ同じ 21.4 で試しています。)
--
山岡
Fnews-brouse 1.9(20180406) -- by Mizuno, MWE <mwe@ccsf.jp>
GnuPG Key ID = ECC8A735
GnuPG Key fingerprint = 9BE6 B9E9 55A5 A499 CD51 946E 9BDC 7870 ECC8 A735