X-Git-Url: https://cgit.sxemacs.org/?p=riece;a=blobdiff_plain;f=lisp%2Friece-handle.el;h=e35515eb75b9adbb737a08bd4113e585a6857185;hp=56852d028334a1d8710734550512506adb1fb845;hb=56f55f8902c6603989cd6b03d28bc9ea72959678;hpb=5ff9b4c7bc7409cb1e0fff6215e5802a731e9d1e diff --git a/lisp/riece-handle.el b/lisp/riece-handle.el index 56852d0..e35515e 100644 --- a/lisp/riece-handle.el +++ b/lisp/riece-handle.el @@ -309,7 +309,10 @@ (let* ((user (riece-prefix-nickname prefix)) (parameters (riece-split-parameters string)) (invited (car parameters)) - (channel (nth 1 parameters))) + (channel (nth 1 parameters)) + (channel-identity (riece-make-identity channel riece-server-name))) + (if (riece-identity-equal-no-server invited riece-real-nickname) + (setq riece-join-channel-candidate channel-identity)) (riece-insert-info (list riece-dialogue-buffer riece-others-buffer) (concat @@ -319,8 +322,7 @@ user riece-server-name)) (riece-format-identity (riece-make-identity invited riece-server-name)) - (riece-format-identity (riece-make-identity - channel riece-server-name)))) + (riece-format-identity channel-identity))) "\n")))) (defun riece-handle-topic-message (prefix string)