diff options
Diffstat (limited to 'bard-emacs-modules')
| -rw-r--r-- | bard-emacs-modules/bard-emacs-circe.el | 23 |
1 files changed, 23 insertions, 0 deletions
diff --git a/bard-emacs-modules/bard-emacs-circe.el b/bard-emacs-modules/bard-emacs-circe.el new file mode 100644 index 0000000..6fb8513 --- /dev/null +++ b/bard-emacs-modules/bard-emacs-circe.el @@ -0,0 +1,23 @@ +(setq auth-sources '("~/.authinfo.gpg")) + +(defun my-fetch-password (&rest params) + (require 'auth-source) + (let ((match (car (apply 'auth-source-search params)))) + (if match + (let ((secret (plist-get match :secret))) + (if (functionp secret) + (funcall secret) + secret)) + (error "Password not found for %S" params)))) + +(defun my-nickserv-password (server) + (my-fetch-password :user "bardman" :machine "irc.libera.chat")) + +(setq circe-network-options + '(("Libera Chat" + :nick "bardman" + :channels ("#emacs" "##anime" "#gentoo") + :nickserv-password my-nickserv-password))) + + +(provide 'bard-emacs-circe) |
