* riece-naming.el (riece-naming-assert-rename): Follow the

[riece] / lisp / riece-message.el

diff --git a/lisp/riece-message.el b/lisp/riece-message.el
index bac5784..c50aa1d 100644 (file)
--- a/lisp/riece-message.el
+++ b/lisp/riece-message.el
@@ -119,7 +119,7 @@
       (unless riece-current-channel
        (riece-switch-to-channel target))
       (riece-redisplay-buffers))
-    (riece-channel-buffer-name target)))
+    (riece-channel-buffer target)))
 
 (defun riece-message-parent-buffers (message buffer)
   "Return the parents of BUFFER where MESSAGE should appear.
@@ -230,7 +230,7 @@ Currently possible values are `action' and `notice'."
          (riece-with-server-buffer (riece-identity-server target)
            (mapcar
             (lambda (user)
-              (riece-make-identity user riece-server-name))
+              (riece-make-identity (car user) riece-server-name))
             (riece-channel-get-users (riece-identity-prefix target))))))))
 
 (provide 'riece-message)