1 files changed, 0 insertions, 105 deletions
diff --git a/emacs/.emacs.d/init/oni-circe-init.el b/emacs/.emacs.d/init/oni-circe-init.el
deleted file mode 100644
index 27484cc..0000000
--- a/emacs/.emacs.d/init/oni-circe-init.el
+++ /dev/null
@@ -1,105 +0,0 @@
-;;; oni-circe-init.el --- My Circe configuration     -*- lexical-binding: t; -*-
-
-;; Copyright (C) 2018  Tom Willemse
-
-;; Author: Tom Willemse <tom@ryuslash.org>
-;; Keywords: local
-
-;; This program is free software; you can redistribute it and/or modify
-;; it under the terms of the GNU General Public License as published by
-;; the Free Software Foundation, either version 3 of the License, or
-;; (at your option) any later version.
-
-;; This program is distributed in the hope that it will be useful,
-;; but WITHOUT ANY WARRANTY; without even the implied warranty of
-;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-;; GNU General Public License for more details.
-
-;; You should have received a copy of the GNU General Public License
-;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
-
-;;; Commentary:
-
-;; My Circe configuration
-
-;;; Code:
-
-(require 'circe)
-(require 'circe-color-nicks)
-(require 'circe-serenity)
-(require 'oni-circe)
-;(require 'mowedline)
-
-(add-to-list 'circe-network-options
-             `("Freenode"
-               :nick "ryuslash"
-               :channels ("#mowedline"
-                          "#ninthfloor"
-                          "#dispass"
-                          "#linuxvoice"
-                          "#conkeror"
-                          "#emacs-circe"
-                          "#chicken"
-                          :after-auth
-                          "#emacs")
-               :nickserv-password
-               ,(oni-circe-get-password-for "irc.freenode.net")))
-
-(add-to-list 'circe-network-options
-             `("Twitch"
-               :use-tls nil
-               :nick "ryuslash"
-               :host "irc.twitch.tv"
-               :pass ,(oni-circe-get-password-for "irc.twitch.tv")
-               :port 6667))
-
-(enable-circe-color-nicks)
-
-(enable-circe-serenity)
-
-(defun mowedline-colorize-mode-line-spec (s)
-  (cond
-   ((stringp s) (string-trim s))
-   ((eq ':propertize (car s))
-    (let ((s (cadr s))
-          (face (plist-get (cddr s) 'face)))
-      (if face
-          `(color ,(face-foreground face)
-                  ,(substring-no-properties s))
-        s)))
-   (t "")))
-
-;(setq mowedline-update-function 'mowedline-update/dbus)
-
-(defvar jjf-tracking-buffers '())
-(defvar jjf-external-tracking-timer nil)
-(defun jjf-external-tracking ()
-  (setq jjf-external-tracking-timer nil)
-  (mowedline-update
-   'irc
-   (if (stringp jjf-tracking-buffers)
-       (mowedline-colorize jjf-tracking-buffers t)
-     (format "%S" (mapcar #'mowedline-colorize-mode-line-spec
-                          jjf-tracking-buffers)))))
-
-(defun oni:clear-irc-mowedline-widget ()
-  (mowedline-clear 'irc))
-
-(defun jjf-external-tracking-advice (orig-fun &rest args)
-  "Update my external status bar when tracking computes a new
-status line, and suppress tracking in the mode-line.  Since
-tracking-status may be called many times in quick succession, for
-example on a make-frame-visible event, we use a short timer to
-only call the updater once within a minimum duration."
-  (setq jjf-tracking-buffers (apply orig-fun args))
-  (when jjf-external-tracking-timer
-    (cancel-timer jjf-external-tracking-timer))
-  (setq jjf-external-tracking-timer
-        (run-at-time 0.2 nil 'jjf-external-tracking))
-  nil)
-
-;(advice-add 'tracking-status :around #'jjf-external-tracking-advice)
-;(add-hook 'kill-emacs-hook 'oni:clear-irc-mowedline-widget)
-
-(provide 'oni-circe-init)
-;;; oni-circe-init.el ends here