(funcall riece-message-make-global-name-function message)
(funcall riece-message-make-name-function message)))
(server-name (riece-identity-server (riece-message-speaker message))))
(funcall riece-message-make-global-name-function message)
(funcall riece-message-make-name-function message)))
(server-name (riece-identity-server (riece-message-speaker message))))