summaryrefslogtreecommitdiffhomepage
diff options
context:
space:
mode:
-rw-r--r--init.org18
1 files changed, 13 insertions, 5 deletions
diff --git a/init.org b/init.org
index 24bf510..2a25e89 100644
--- a/init.org
+++ b/init.org
@@ -2701,7 +2701,10 @@
* Chats
*** circe
#+begin_src emacs-lisp
- (defvar jao-irc-channels '())
+ (defvar jao-libera-channels '())
+ (defvar jao-oftc-channels '())
+ (defvar jao-bitlbee-channels '())
+
(use-package circe
:ensure t
:bind (:map circe-channel-mode-map
@@ -2753,13 +2756,16 @@
(circe-command-MSG "nickserv" (format "RELEASE %s" u))
(circe-command-NICK u)))
- (defvar jao-bitlbee-channels ())
(setq circe-network-options
(let ((up (jao--get-user/password "libera"))
+ (oup (jao--get-user/password "oftc"))
(bup (jao--get-user/password "bitlbee")))
- `(("Libera Chat" :host "irc.libera.chat"
- :nick ,(car up) :channels ,jao-irc-channels
+ `(("Libera Chat"
+ :nick ,(car up) :channels ,jao-libera-channels
:tls t :sasl-username ,(car up) :sasl-password ,(cadr up))
+ ("OFTC" :nick ,(car oup) :channels ,jao-oftc-channels
+ :nickserv-password ,(cadr oup)
+ :tls t :sasl-username ,(car oup) :sasl-password ,(cadr oup))
("Bitlbee"
:host "127.0.0.1" :nick ,(car bup)
:channels ,jao-bitlbee-channels
@@ -2856,7 +2862,9 @@
(when (or p (y-or-n-p "Connect to telegram? "))
(telega))
(when (or p (y-or-n-p "Connect to libera? "))
- (circe "Libera Chat")))
+ (circe "Libera Chat"))
+ (when (or p (y-or-n-p "Connect to OFTC? "))
+ (circe "OFTC")))
(pretty-hydra-define jao-hydra-chats (global-map "s-q" :color blue :quit-key "q")
("Connect"