X-Git-Url: https://cgit.sxemacs.org/?a=blobdiff_plain;ds=sidebyside;f=lisp%2Friece-handle.el;h=56852d028334a1d8710734550512506adb1fb845;hb=5ff9b4c7bc7409cb1e0fff6215e5802a731e9d1e;hp=2ca23eb692156e5a361df10ef806e56a01199d3e;hpb=6c73c4dc2eb344e8908fbbaeddcd96119703ef61;p=riece diff --git a/lisp/riece-handle.el b/lisp/riece-handle.el index 2ca23eb..56852d0 100644 --- a/lisp/riece-handle.el +++ b/lisp/riece-handle.el @@ -308,14 +308,17 @@ (defun riece-handle-invite-message (prefix string) (let* ((user (riece-prefix-nickname prefix)) (parameters (riece-split-parameters string)) - (channel (car parameters))) + (invited (car parameters)) + (channel (nth 1 parameters))) (riece-insert-info (list riece-dialogue-buffer riece-others-buffer) (concat (riece-concat-server-name - (format "%s invites you to %s" + (format "%s invites %s to %s" (riece-format-identity (riece-make-identity user riece-server-name)) + (riece-format-identity (riece-make-identity + invited riece-server-name)) (riece-format-identity (riece-make-identity channel riece-server-name)))) "\n"))))