From 52a287470ea2088b9aa6c3427b769f4d7b698537 Mon Sep 17 00:00:00 2001 From: Ramakrishnan Muthukrishnan Date: Sat, 1 Nov 2014 18:57:13 +0530 Subject: [PATCH] erc --- init.el | 25 +++++++++++++++++++++++++ 1 file changed, 25 insertions(+) diff --git a/init.el b/init.el index 1d969f1..3e4e34a 100644 --- a/init.el +++ b/init.el @@ -103,3 +103,28 @@ (autoload 'ghc-debug "ghc" nil t) (add-hook 'haskell-mode-hook (lambda () (ghc-init))) +;; erc +(require 'erc) + +(erc-autojoin-mode t) +(setq erc-autojoin-channels-alist +'((".*\\.freenode.net" "#tahoe-lafs") +(".*\\.oftc.net" "#LeastAuthority"))) + +;; check channels +(erc-track-mode t) +(setq erc-track-exclude-types '("JOIN" "NICK" "PART" "QUIT" "MODE" + +"324" "329" "332" "333" "353" "477")) +;; don't show any of this +(setq erc-hide-list '("JOIN" "PART" "QUIT" "NICK")) + +(defun start-erc () +"Connect to IRC." +(interactive) +(when (y-or-n-p "Do you want to start IRC? ") +(erc :server "irc.freenode.net" :port 6667 :nick "rkrishnan" :full-name "Ramakrishnan Muthukrishnan") +(erc :server "irc.oftc.net" :port 6667 :nick "rkrishnan" :full-name "Ramakrishnan Muthukrishnan"))) + +;; switch to ERC with Ctrl+c e +(global-set-key (kbd "C-c e") 'start-erc) ;; ERC -- 2.37.2