summary refs log tree commit diff stats
diff options
context:
space:
mode:
-rw-r--r--init.el7
-rw-r--r--lisp/acdw-modeline.el4
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 ()