From 8a0098ee52cdb7b790400e52fa0739f5da053793 Mon Sep 17 00:00:00 2001 From: Sean Farley Date: Mon, 21 Jan 2019 17:12:59 -0800 Subject: [PATCH] irc: add +circe-buffer-p This allows us to list the circe buffers as real when they are added to the +irc--workspace-name. --- modules/app/irc/config.el | 8 ++++++++ 1 file changed, 8 insertions(+) diff --git a/modules/app/irc/config.el b/modules/app/irc/config.el index f72bb8abb..e83f8611b 100644 --- a/modules/app/irc/config.el +++ b/modules/app/irc/config.el @@ -117,6 +117,14 @@ playback.") '((text-properties . (face circe-fool-face lui-do-not-track t))))) (add-hook 'circe-message-option-functions #'+irc|circe-message-option-bot) + (defun +circe-buffer-p (buf) + "Return non-nil if BUF is a `circe-mode' buffer." + (with-current-buffer buf + (and (derived-mode-p 'circe-mode) + (eq (safe-persp-name (get-current-persp)) + +irc--workspace-name)))) + (add-hook 'doom-real-buffer-functions #'+circe-buffer-p) + (after! solaire-mode ;; distinguish chat/channel buffers from server buffers. (add-hook 'circe-chat-mode-hook #'solaire-mode))