diff options
| author | Case Duckworth | 2021-05-24 17:08:32 -0500 |
|---|---|---|
| committer | Case Duckworth | 2021-05-24 17:08:32 -0500 |
| commit | 1a20d6329e567d9d998ac27a7fc3e6fd39c7fb59 (patch) | |
| tree | 1e2ad272d64e466ed58706087e47c528fd0d93b7 /init.el | |
| parent | Remove modeline customization in acdw/reading-mode (diff) | |
| download | emacs-1a20d6329e567d9d998ac27a7fc3e6fd39c7fb59.tar.gz emacs-1a20d6329e567d9d998ac27a7fc3e6fd39c7fb59.zip | |
Further customize ERC
I also added acdw-erc.el.
Diffstat (limited to 'init.el')
| -rw-r--r-- | init.el | 43 |
1 files changed, 28 insertions, 15 deletions
| diff --git a/init.el b/init.el index b8002a3..2c18993 100644 --- a/init.el +++ b/init.el | |||
| @@ -260,22 +260,35 @@ | |||
| 260 | 260 | ||
| 261 | ;; I don't really use ERC that much, but if/when I start ... I'll be ready. | 261 | ;; I don't really use ERC that much, but if/when I start ... I'll be ready. |
| 262 | (setup erc | 262 | (setup erc |
| 263 | (:option erc-track-position-in-mode-line 'before-modes | 263 | (:require acdw-erc) |
| 264 | erc-hide-list '("329" "332" "333" "353" "MODE" | 264 | (:also-load erc-autoaway |
| 265 | "TOPIC" "JOIN" "PART" "QUIT" "NICK")) | 265 | erc-track) |
| 266 | ;; https://www.emacswiki.org/emacs/ErcModeline#h5o-1 | ||
| 267 | (defface erc-header-line-disconnected | ||
| 268 | '((t (:foreground "black" :background "indianred"))) | ||
| 269 | "Face to use when ERC has been disconnected.") | ||
| 270 | 266 | ||
| 271 | (defun erc-update-header-line-show-disconnected () | 267 | (:option erc-auto-discard-away t |
| 272 | "Use a different face in the header-line when disconnected." | 268 | erc-autoaway-idle-seconds 600 |
| 273 | (erc-with-server-buffer | 269 | erc-autojoin-channels-alist '(("libera.chat" |
| 274 | (cond ((erc-server-process-alive) 'erc-header-line) | 270 | "#emacs" "##webpals") |
| 275 | (t 'erc-header-line-disconnected)))) | 271 | ("tilde.chat" |
| 276 | 272 | "#meta" "#team" "#gemini")) | |
| 277 | (:option erc-header-line-face-method | 273 | erc-header-line-face-method |
| 278 | #'erc-update-header-line-show-disconnected)) | 274 | #'erc/update-header-line-show-disconnected |
| 275 | erc-hide-list '("JOIN" "NICK" "PART" "QUIT" "MODE" | ||
| 276 | "324" "329" "332" "333" "353" "477") | ||
| 277 | erc-interpret-mirc-color t | ||
| 278 | erc-kill-buffer-on-part t | ||
| 279 | erc-kill-queries-on-quit t | ||
| 280 | erc-kill-server-buffer-on-quit t | ||
| 281 | erc-nick "acdw" | ||
| 282 | erc-prompt-for-password nil ; use ~/.authinfo | ||
| 283 | erc/servers '("irc.libera.chat" | ||
| 284 | "irc.tilde.chat") | ||
| 285 | erc-server-coding-system '(utf-8 . utf-8) | ||
| 286 | erc-track-exclude-types erc-hide-list | ||
| 287 | erc-track-position-in-mode-line 'before-modes) | ||
| 288 | |||
| 289 | (:hook erc-autoaway-mode | ||
| 290 | erc-track-mode | ||
| 291 | erc-truncate-mode)) | ||
| 279 | 292 | ||
| 280 | (setup eshell | 293 | (setup eshell |
| 281 | (:option eshell-directory-name (acdw/dir "eshell/" t) | 294 | (:option eshell-directory-name (acdw/dir "eshell/" t) |