From 57f0dd43c4147d69b4a6ab4d482d353ae520ab63 Mon Sep 17 00:00:00 2001
From: Case Duckworth
Date: Wed, 27 Apr 2022 08:38:03 -0500
Subject: bleh

---
 lisp/+jabber.el | 12 ++++++++++++
 1 file changed, 12 insertions(+)

(limited to 'lisp')

diff --git a/lisp/+jabber.el b/lisp/+jabber.el
index 2382102..c5d568c 100644
--- a/lisp/+jabber.el
+++ b/lisp/+jabber.el
@@ -250,5 +250,17 @@ associated face.  Ignore notification if face is ‘nil’."
                          (buffer-string))
                        :time (current-time))))))))))))
 
+(defun +jabber-colors-update (&optional buffer)
+  "Update jabber colors in BUFFER, defaulting to the current."
+  (with-current-buffer (or buffer (current-buffer))
+    (when jabber-buffer-connection
+      (setq jabber-muc-participant-colors nil)
+      (cond (jabber-chatting-with
+             (jabber-chat-create-buffer jabber-buffer-connection
+                                        jabber-chatting-with))
+            (jabber-group
+             (jabber-muc-create-buffer jabber-buffer-connection
+                                       jabber-group))))))
+
 (provide '+jabber)
 ;;; +jabber.el ends here
-- 
cgit 1.4.1-21-gabe81