diff options
| author | tslil clingman <> | 2021-04-14 22:28:37 -0400 |
|---|---|---|
| committer | tslil clingman <> | 2021-04-14 22:28:37 -0400 |
| commit | f5faf8ff7ff8378977f9c5a0fa3e5a009f3f7e62 (patch) | |
| tree | c93df2e47195c2a216ac102a7c613bd641d5860b /emacs | |
| parent | 87313d6fb5d78a525b3335bb42db179b7a2b1768 (diff) | |
Rather copy a template, fill in passwords, and then purge
Diffstat (limited to 'emacs')
| -rw-r--r-- | emacs/inits/30-irc.el | 19 |
1 files changed, 12 insertions, 7 deletions
diff --git a/emacs/inits/30-irc.el b/emacs/inits/30-irc.el index 1eecee4..d39e111 100644 --- a/emacs/inits/30-irc.el +++ b/emacs/inits/30-irc.el @@ -1,4 +1,4 @@ -;; Time-stamp: <2021-04-11 20h03 EDT (hobbies)> +;; Time-stamp: <2021-04-14 22h28 EDT (hobbies)> (use-package rcirc :ensure t @@ -6,6 +6,7 @@ :hook (rcirc-mode . (lambda () (rcirc-track-minor-mode) (spell-fu-mode 1) + (visual-line-mode) (set (make-local-variable 'scroll-conservatively) 8192))) :config (use-package rcirc-color @@ -18,6 +19,7 @@ (require 'auth-source) (defadvice rcirc (before rcirc-read-from-authinfo activate) (unless arg + (setq rcirc-server-alist (copy-tree rcirc-server-alist-template)) (dolist (server rcirc-server-alist) (let* ((pl (cdr server)) (host (plist-get pl :host)) @@ -34,6 +36,9 @@ (error "Password not found for %s" host))))) (message "Found authorisation information for %s." host)))))) + (defadvice rcirc (after rcirc-clean-passwords activate) + (setq rcirc-server-alist nil)) + (setq rcirc-default-full-name "tslil" rcirc-default-nick "tslil" rcirc-default-user-name "hiato" @@ -41,9 +46,9 @@ rcirc-log-directory "~/logs/irc/" rcirc-fill-column 80 rcirc-log-flag t - rcirc-server-alist '(("ZNC instance" - :host "znc.address.tld" - :port 6697 - :user "user" - :password "%LOOKUP%" - :encryption tls)))) + rcirc-server-alist-template '(("l-3.space" + :host "l-3.space" + :port 6697 + :user "tslil" + :password "%LOOKUP%" + :encryption tls)))) |