diff options
-rw-r--r-- | init.el | 7 | ||||
-rw-r--r-- | lisp/acdw-modeline.el | 4 |
2 files changed, 7 insertions, 4 deletions
diff --git a/init.el b/init.el index 4f71122..ccb35ca 100644 --- a/init.el +++ b/init.el | |||
@@ -328,6 +328,10 @@ | |||
328 | erc-track-mode | 328 | erc-track-mode |
329 | erc-truncate-mode) | 329 | erc-truncate-mode) |
330 | 330 | ||
331 | ;; disable ERC tracking when working ... BE PRODUCTIVE! | ||
332 | (add-hook 'org-clock-in-hook #'erc-track-disable) | ||
333 | (add-hook 'org-clock-out-hook #'erc-track-enable) | ||
334 | |||
331 | (:bind "C-c C-b" acdw-erc/erc-switch-to-buffer | 335 | (:bind "C-c C-b" acdw-erc/erc-switch-to-buffer |
332 | "C-c C-c" nil ; def: `erc-toggle-interpret-controls' | 336 | "C-c C-c" nil ; def: `erc-toggle-interpret-controls' |
333 | ) | 337 | ) |
@@ -1268,7 +1272,8 @@ successive invocations." | |||
1268 | (er/expand-region 1)) | 1272 | (er/expand-region 1)) |
1269 | (t (set-mark-command arg)))) | 1273 | (t (set-mark-command arg)))) |
1270 | 1274 | ||
1271 | (:global "C-SPC" acdw/set-mark-or-expand-region)) | 1275 | (:global "C-=" er/expand-region |
1276 | "C-SPC" acdw/set-mark-or-expand-region)) | ||
1272 | 1277 | ||
1273 | (setup (:straight fennel-mode) | 1278 | (setup (:straight fennel-mode) |
1274 | (:needs "fennel") | 1279 | (:needs "fennel") |
diff --git a/lisp/acdw-modeline.el b/lisp/acdw-modeline.el index f1e7d27..6a19428 100644 --- a/lisp/acdw-modeline.el +++ b/lisp/acdw-modeline.el | |||
@@ -33,9 +33,7 @@ | |||
33 | 33 | ||
34 | (defun acdw-modeline/erc () | 34 | (defun acdw-modeline/erc () |
35 | "ERC indicator for the modeline." | 35 | "ERC indicator for the modeline." |
36 | (when (and (boundp 'erc-modified-channels-object) | 36 | (when (and (boundp 'erc-modified-channels-object)) |
37 | (not (bound-and-true-p org-clock-current-task)) | ||
38 | ) | ||
39 | (format-mode-line erc-modified-channels-object))) | 37 | (format-mode-line erc-modified-channels-object))) |
40 | 38 | ||
41 | (defun acdw-modeline/god-mode-indicator () | 39 | (defun acdw-modeline/god-mode-indicator () |