X-Git-Url: https://cgit.sxemacs.org/?a=blobdiff_plain;f=lisp%2Friece-message.el;h=f9d3740f9cf94a5673de1fbf835f73c6a2785d8e;hb=0058bab7a52f813282167910b2a884715aeec0ef;hp=4eccca7a45e92cacfccef55027fc2c8d347ec5b0;hpb=acb16fddc18c48ef52cb680a911d8fae18da3ef3;p=riece

diff --git a/lisp/riece-message.el b/lisp/riece-message.el
index 4eccca7..f9d3740 100644
--- a/lisp/riece-message.el
+++ b/lisp/riece-message.el
@@ -66,10 +66,10 @@
 
 (defun riece-message-make-open-bracket (message)
   "Make `open-bracket' string for MESSAGE."
-  (if (riece-message-own-p message)
-      ">"
-    (if (eq (riece-message-type message) 'notice)
-	"{"
+  (if (eq (riece-message-type message) 'notice)
+      "{"
+    (if (riece-message-own-p message)
+	">"
       (if (riece-message-private-p message)
 	  "="
 	(if (riece-message-external-p message)
@@ -78,10 +78,10 @@
 
 (defun riece-message-make-close-bracket (message)
   "Make `close-bracket' string for MESSAGE."
-  (if (riece-message-own-p message)
-      "<"
-    (if (eq (riece-message-type message) 'notice)
-	"}"
+  (if (eq (riece-message-type message) 'notice)
+      "}"
+    (if (riece-message-own-p message)
+	"<"
       (if (riece-message-private-p message)
 	  "="
 	(if (riece-message-external-p message)
@@ -152,7 +152,7 @@ Normally they are *Dialogue* and/or *Others*."
 	     (funcall riece-message-make-global-name-function message)
 	   (funcall riece-message-make-name-function message)))
 	(server-name (riece-identity-server (riece-message-speaker message))))
-    (riece-with-server-buffer (riece-current-server-name)
+    (riece-with-server-buffer server-name
       (concat
        (if global
 	   (riece-concat-server-name