howard/hamacs
howard/hamacs
1
1
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Eschewing a ZNC approach for just directly going into IRC

Browse source
This commit is contained in:
Howard Abrams 2023-12-13 11:25:23 -08:00
parent aed9f98082
commit c91f93dd68
1 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
ha-irc.org
View file

@ -63,11 +63,11 @@ My IRC /needs/ are basic, but I'm not sure which I want to use.
(defun ha-erc-connect-irc () (defun ha-erc-connect-irc ()
"Connect to my favorite IRC server with ERC." "Connect to my favorite IRC server with ERC."
(interactive) (interactive)
(let* ((auth-results (auth-source-search :host "howardabrams.com" :port 7777 :max 1)) (let* ((auth-results (auth-source-search :host "irc.libera.chat" :port 6667 :max 1))
(auth-first (first auth-results)) (auth-first (first auth-results))
(username (plist-get auth-first :user)) (username (plist-get auth-first :user))
(password (funcall (plist-get auth-first :secret)))) (password (funcall (plist-get auth-first :secret))))
(erc :server "howardabrams.com" :port 7777) (erc :server "irc.libera.chat" :port 6667)
(sit-for 2) (sit-for 2)
(erc-cmd-QUOTE (format "PASS %s:%s" username password)))) (erc-cmd-QUOTE (format "PASS %s:%s" username password))))
#+end_src #+end_src