From 592e4e8d56959c95a4e4eaf9a1cc49c7be9deb80 Mon Sep 17 00:00:00 2001 From: jao Date: Sun, 23 May 2021 02:16:46 +0100 Subject: circe configuration --- attic/misc.org | 78 ---------------------------------------------------------- 1 file changed, 78 deletions(-) (limited to 'attic') diff --git a/attic/misc.org b/attic/misc.org index 12ebdd4..83f969c 100644 --- a/attic/misc.org +++ b/attic/misc.org @@ -209,81 +209,3 @@ :diminish ((rcirc-omit-mode . ""))) #+end_src -* circe - #+begin_src emacs-lisp - (defvar jao-irc-channels '()) - (use-package circe - :ensure t - :bind (:map circe-channel-mode-map - (("C-c C-a" . lui-track-jump-to-indicator))) - :init - (setq circe-default-realname "https://jao.io" - circe-default-part-message "" - circe-default-quit-message "" - circe-ignore-list nil - circe-server-coding-system '(undecided . undecided) - circe-server-killed-confirmation 'ask-and-kill-all - circe-server-auto-join-default-type :after-auth - circe-format-say "({nick}) {body}" - circe-format-self-say "(jao) {body}" - circe-new-buffer-behavior 'ignore - circe-new-buffer-behavior-ignore-auto-joins t - circe-nickserv-ghost-style 'after-auth - circe-prompt-string ": " - circe-completion-suffix ", " - circe-reduce-lurker-spam t - - circe-nick-next-function - (lambda (old) - (replace-regexp-in-string "-" "`" (circe-nick-next old))) - - circe-lagmon-mode-line-format-string "" ;; "%.0f " - circe-lagmon-mode-line-unknown-lag-string "" ;; "? " - circe-lagmon-timer-tick 120 - circe-lagmon-reconnect-interval 180 - - lui-max-buffer-size 30000 - lui-fill-column 80 - lui-time-stamp-position 'right - lui-time-stamp-format "%H:%M" - lui-flyspell-p nil - - lui-track-indicator 'fringe - lui-track-behavior 'before-tracking-next-buffer) - :config - - (defun circe-command-RECOVER (&rest ignore) - "Recover nick" - (let* ((fn (jao--get-user/password "freenode")) - (u (car fn)) - (p (cadr fn))) - (circe-command-MSG "nickserv" (format "IDENTIFY %s %s" u p)) - (circe-command-MSG "nickserv" (format "GHOST %s" u)) - (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 "freenode")) - (bup (jao--get-user/password "bitlbee"))) - `(("libera" - :host "irc.libera.chat" :port 6667 - :nick ,(car up) :channels ,jao-irc-channels - :tls t :nickserv-password ,(cadr up)) - ("Freenode" :nick ,(car up) :channels ,jao-irc-channels - :tls t :sasl-username ,(car up) :sasl-password ,(cadr up)) - ("Bitlbee" - :host "127.0.0.1" :nick ,(car bup) - :channels ,jao-bitlbee-channels - :lagmon-disabled t - :nickserv-password ,(cadr bup) :user ,(car bup))))) - - (jao-shorten-modes 'circe-channel-mode - 'circe-server-mode - 'circe-query-mode) - - (circe-lagmon-mode) - (enable-circe-color-nicks) - (enable-circe-display-images) - (enable-lui-track)) - #+end_src -- cgit v1.2.3