Mathias Dahl <[EMAIL PROTECTED]> writes:
> Add this to your anything sources:
>
> ...
> ((name . "Jabber Contacts")
> (candidates . (lambda ()
> (mapcar
> (lambda (x)
> (car x))
> (my-jabber-list-contacts))))
> (action . (lambda (x)
> (jabber-chat-with
> (jabber-read-account)
> x))))
> ...
I have no idea how that worked earlier, this is how it should be:
((name . "Jabber Contacts")
(candidates . (lambda ()
(mapcar
(lambda (x)
(car x))
(my-jabber-list-contacts))))
(action . (lambda (x)
(jabber-chat-with
(jabber-read-account)
(symbol-name
(cdr (assoc x (my-jabber-list-contacts))))))))
/Mathias
_______________________________________________
gnu-emacs-sources mailing list
[email protected]
http://lists.gnu.org/mailman/listinfo/gnu-emacs-sources
