[Mew-dist 10805] Re: mew-header-alist
YAMAGUCHI Shuhei
yamagus at example.com
1999年 10月 7日 (木) 10:52:59 JST
>>>>> In [Mew-dist : No.10801]
>>>>> Takayoshi "TK" KAWATE <taka at example.com> wrote:
(か)> mew-header-alistにいろいろとヘッダを付け加えておりますが(^^;),
(か)> 式を評価することはできないのでしょうか。
私はこんな感じでやっています。
(setq mew-header-alist
(list
(cons "X-Emacs:" version)
(if uri
(cons "X-URI:" uri))))
version や uri は 事前に変数に代入してあります(Gnus にも使うので)が、
この部分を評価したい式にすればいいです。
なお、すでに高橋さんが出された方式だと、私のやつは以下のようになります。
(setq mew-header-alist
`(("X-Emacs:" . ,version)
,(if uri `("X-URI:" . ,uri))))
(か)> ("X-hogehoge:". (hugahuga-version))
転記ミスだとは思いますが `.' の前後はスペースが必要ですよ。
問題の本質じゃないですけど…。 ^^;
(か)> ("X-hogehoge:" . (concat "hugahuga ver.%s" hugahuga-version-number))
(setq mew-header-alist
'("X-hogehoge:" .
(concat "hugahuga ver.%s" hugahuga-version-number)))
ということですよね。
quote (') しているので、mew-header-alist の値は、
("X-hogehoge:" concat "hugahuga ver.%s" hugahuga-version-number)
ということになっちゃうんです。
で、"X-hogehoge:" よりも後ろをバッファに挿入しようとしたときに、
(concat "hugahuga ver.%s" hugahuga-version-number)
が文字列じゃないから怒られるわけです。
でわでわ
--
yamagus at example.com / やまぐち@ねっとらぴゅたの住人
yamagus at example.com / 山口 修平
PGP-Fingerprint: 25 0F 6F E1 57 AD 56 08 3A BC D0 9B 48 AF 31 7A
Mew-dist メーリングリストの案内