emacs-jabber (2)

老大从米国过来督阵，于是上班时不再看Google Reader，回家一顿恶补，没注意到终端上的Emacs-Jabber有朋友发来gtalk消息，罪过。总不能alt-tab换来换去不时地瞅瞅终端，于是乎试着设一个``来电提醒''。

M-x play-sound-file，给了个mp3文件，提醒文件格式不支持。从win32下的msn安装文件里找了个online.wav，还是不支持。搜了一下源代码，发现只支持两种格式：
enum sound_type { RIFF, SUN_AUDIO };

于是装了个sox(Swiss army knife of sound processing)想把该.wav文件转换成.au文件，却被提示该.wav文件太短。无奈只有到/usr/share下搜索之，幸好装了sun-java6-demo，所获颇丰。

有了下面的设置，来消息的时候除了在mode-line有提示，还会播放hi.au。
;; play alert when comesnew message
(setq jabber-alert-message-hooks '(jabber-message-wave jabber-message-echo))
(setq jabber-alert-message-wave "~/.emacs.d/hi.au")

此外，每个朋友一个单独记录文件，人人平等：
;; store chat history for each user in per-contact files
(setq jabber-history-enabled t)
(setq jabber-use-global-history nil)
(setq jabber-history-dir "~/.emacs.d")

呃，去掉大头照，文本比较实惠哈：
;; do'not display avatars
(setq jabber-vcard-avatars-retrieve nil)