From 05d500b7bdc4f8bd192d7070ef60ec1d20cb0d7c Mon Sep 17 00:00:00 2001 From: Magnus Henoch Date: Tue, 31 Oct 2006 16:31:38 +0000 Subject: [PATCH] Revision: mange@freemail.hu--2005/emacs-jabber--cvs-head--0--patch-264 Creator: Magnus Henoch Make jabber-watch-alist a defcustom --- jabber-watch.el | 8 ++++++-- 1 file changed, 6 insertions(+), 2 deletions(-) diff --git a/jabber-watch.el b/jabber-watch.el index ccf14d0..dfaf991 100644 --- a/jabber-watch.el +++ b/jabber-watch.el @@ -21,9 +21,13 @@ (require 'jabber-util) -(defvar jabber-watch-alist nil +(defcustom jabber-watch-alist nil "Alist of buddies for which an extra notification should be sent -when they come online, with comment strings as values.") +when they come online, with comment strings as values." + ;; XXX: change symbol to jid-symbol or something, and update + ;; documentation + :type '(alist :key-type symbol :value-type string) + :group 'jabber-watch) (defun jabber-presence-watch (who oldstatus newstatus statustext proposed-alert)