From fbf108217494f9497168b0fe034a2880ec9fe25a Mon Sep 17 00:00:00 2001
From: Case Duckworth
Date: Sat, 7 Aug 2021 15:08:29 -0500
Subject: Turn off ERC modeline when clocked in

Less distracting.
---
 lisp/acdw-modeline.el | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

(limited to 'lisp/acdw-modeline.el')

diff --git a/lisp/acdw-modeline.el b/lisp/acdw-modeline.el
index ccc07cb..db20b5a 100644
--- a/lisp/acdw-modeline.el
+++ b/lisp/acdw-modeline.el
@@ -32,7 +32,9 @@
 
 (defun acdw-modeline/erc ()
   "ERC indicator for the modeline."
-  (when (boundp 'erc-modified-channels-object)
+  (when (and (boundp 'erc-modified-channels-object)
+             (not (bound-and-true-p org-clock-current-task))
+             )
     (format-mode-line erc-modified-channels-object)))
 
 (defun acdw-modeline/god-mode-indicator ()
-- 
cgit 1.4.1-21-gabe81