* riece-server.el (riece-server-keyword-map): `:coding-system' ->
[elisp/riece.git] / lisp / riece-300.el
index 5846267..7e2b58c 100644 (file)
           (concat
            (riece-concat-server-name
             (format "Mode for %s: %s" channel mode-string))
-           "\n"))))))
+           "\n")))
+       (riece-update-channel-indicator)
+       (force-mode-line-update t))))
 
 (defun riece-handle-set-topic (prefix number name string remove)
   (if (string-match "^\\([^ ]+\\) :" string)