From: Amin Bandali <bandali@gnu.org>
Date: Tue, 26 Feb 2019 16:19:23 +0000 (-0500)
Subject: [emacs] skeleton for irc setup with ERC and ZNC
X-Git-Url: https://git.shemshak.org/gitweb.cgi/~bandali/configs/commitdiff_plain/3f74e7b36898d38f3794afb6acc325ccbf673a83?ds=inline

[emacs] skeleton for irc setup with ERC and ZNC
---

diff --git a/init.org b/init.org
index 6f9789f..83ae614 100644
--- a/init.org
+++ b/init.org
@@ -1219,7 +1219,8 @@ There's no way I could top that, so I won't attempt to.
       ("emacs"
        (or
         (name . "^\\*scratch\\*$")
-        (name . "^\\*Messages\\*$"))))))
+        (name . "^\\*Messages\\*$")))
+      ("erc" (mode . erc-mode)))))
   (ibuffer-formats
    '((mark modified read-only locked " "
            (name 18 18 :left :elide)
@@ -1903,6 +1904,7 @@ Emacs package that displays available keybindings in popup
     "C-x v"   "version control"
     ;; prefixes for my personal bindings
     "C-c a"   "applications"
+    "C-c a e" "erc"
     "C-c a s" "shells"
     "C-c p"   "package-management"
     "C-c p e" "package-management/epkg"
@@ -2563,6 +2565,30 @@ Convenient footnotes in =message-mode=.
     (gnus-harvest-install)))
 #+end_src
 
+* IRC
+:PROPERTIES:
+:CUSTOM_ID: irc
+:END:
+
+Now with ERC!
+
+#+begin_src emacs-lisp
+(use-package znc
+  :straight (:host nil :repo "https://git.bndl.org/amin/znc.el")
+  :bind (("C-c a e e" . znc-erc)
+         ("C-c a e a" . znc-all))
+  :config
+  (let ((pwd (let ((auth (auth-source-search :host "znca")))
+               (cond
+                ((null auth) (error "Couldn't find znca's authinfo"))
+                (t (funcall (plist-get (car auth) :secret)))))))
+    (setq znc-servers
+          `(("znc.bndl.org" 1337 t
+             ((freenode "amin/freenode" ,pwd)))
+            ("znc.bndl.org" 1337 t
+             ((moznet "amin/moznet" ,pwd)))))))
+#+end_src
+
 * Blogging
 :PROPERTIES:
 :CUSTOM_ID: blogging
diff --git a/straight/versions/default.el b/straight/versions/default.el
index a1a686c..4873d1e 100644
--- a/straight/versions/default.el
+++ b/straight/versions/default.el
@@ -80,5 +80,6 @@
  ("use-package" . "12731665e068a68883bdb280e9844dbfd14e5626")
  ("web-mode" . "8c412fed3bc7e7df6299c18597e8cb841123c106")
  ("with-editor" . "38df9bfc2227bcb7ac4899c83a03756d5f171450")
- ("yasnippet" . "1d96da2e08664c31ff7f6f7441da1f4fa5680b1f"))
+ ("yasnippet" . "1d96da2e08664c31ff7f6f7441da1f4fa5680b1f")
+ ("znc" . "ee50cc596adab44cf5460ef62be2c6e3d745aa5b"))
 :saturn