summaryrefslogtreecommitdiff
path: root/emacs/inits/30-irc.el
blob: edc33b237df655d7d6c744a26c8102e35418211f (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
;; Time-stamp: <2021-04-09 14h12 EDT (hobbies)>

(use-package rcirc
	:ensure t
	:defer
	:hook (rcirc-mode . (lambda ()
												(rcirc-track-minor-mode)
												(spell-fu-mode 1)
												(set (make-local-variable 'scroll-conservatively) 8192)))
	:config
	(use-package rcirc-color
		:ensure t
		:if (window-system))

	(require 'auth-source)
	(defadvice rcirc (before rcirc-read-from-authinfo activate)
		(unless arg
			(dolist (p (auth-source-search :port '("nickserv")
																		 :require '(:port :user :secret)))
				(let ((secret (plist-get p :secret))
							(method (intern (plist-get p :port))))
					(add-to-list 'rcirc-authinfo
											 (list (plist-get p :host)
														 method
														 (plist-get p :user)
														 (if (functionp secret)
																 (funcall secret)
															 secret)))))))

	(setq rcirc-default-full-name "tslil"
				rcirc-default-nick "hiato"
				rcirc-default-user-name "hiato"
				rcirc-time-format "%Y-%m-%d %H:%M "
				rcirc-log-directory "~/logs/irc/"
				rcirc-fill-column 80
				rcirc-log-flag t
				rcirc-server-alist '(("irc.freenode.net"
															:port 6697
															:encryption tls
															:channels '("#esoteric" "#zig")))))