circe configuration

1 files changed, 0 insertions, 78 deletions

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