X-Git-Url: http://cgit.sxemacs.org/?p=riece;a=blobdiff_plain;f=lisp%2Friece-misc.el;h=60a02c002a6568b33053e81eb72018a59cb6ee09;hp=2ba578582ebb5c524ee57acebd84062785f8e4f4;hb=b2a4a502157459f7e060cd04322152c83adf32f8;hpb=005a2a7642c9f43d699922799801124a77d56f5d diff --git a/lisp/riece-misc.el b/lisp/riece-misc.el index 2ba5785..60a02c0 100644 --- a/lisp/riece-misc.el +++ b/lisp/riece-misc.el @@ -108,9 +108,10 @@ (defun riece-concat-channel-topic (target string) (riece-with-server-buffer (riece-identity-server target) (let ((topic (riece-channel-get-topic (riece-identity-prefix target)))) - (if topic - (concat string ": " topic) - string)))) + (if (or (null topic) + (equal topic "")) + string + (concat string ": " topic))))) (defun riece-concat-channel-modes (target string) (riece-with-server-buffer (riece-identity-server target)