jt/emacs-prelude
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

extracted some user specific ERC settings into a sample

Browse source 
personal-erc.el that others can use in their personal Prelude folder
This commit is contained in:
Bozhidar Batsov 2011-11-23 23:19:59 +02:00
parent 73bd5118fc
commit 6eba2006ff
2 changed files with 19 additions and 18 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

19
modules/prelude-erc.el
View file

@ -39,10 +39,6 @@
(require 'erc-spelling) (require 'erc-spelling)
(require 'erc-autoaway) (require 'erc-autoaway)
;; Join the a couple of interesting channels whenever connecting to Freenode.
(setq erc-autojoin-channels-alist '(("freenode.net"
"#emacs" "#ruby" "#lisp")))
;; Interpret mIRC-style color commands in IRC chats ;; Interpret mIRC-style color commands in IRC chats
(setq erc-interpret-mirc-color t) (setq erc-interpret-mirc-color t)
@ -76,9 +72,6 @@
;; truncate long irc buffers ;; truncate long irc buffers
(erc-truncate-mode +1) (erc-truncate-mode +1)
;; share my real name
(setq erc-user-full-name "Bozhidar Batsov")
;; enable spell checking ;; enable spell checking
(erc-spelling-mode 1) (erc-spelling-mode 1)
;; set different dictionaries by different servers/channels ;; set different dictionaries by different servers/channels
@ -140,16 +133,6 @@ that can occur between two notifications. The default is
(setq erc-autoaway-idle-seconds 600) (setq erc-autoaway-idle-seconds 600)
(setq erc-autoaway-use-emacs-idle t) (setq erc-autoaway-use-emacs-idle t)
;; auto identify
(when (file-exists-p (expand-file-name "~/.ercpass"))
(load "~/.ercpass")
(require 'erc-services)
(erc-services-mode 1)
(setq erc-prompt-for-nickserv-password nil)
(setq erc-nickserv-passwords
`((freenode (("bozhidar" . ,bozhidar-pass)))))
)
;; utf-8 always and forever ;; utf-8 always and forever
(setq erc-server-coding-system '(utf-8 . utf-8)) (setq erc-server-coding-system '(utf-8 . utf-8))
@ -157,7 +140,7 @@ that can occur between two notifications. The default is
"Connect to IRC." "Connect to IRC."
(interactive) (interactive)
(when (y-or-n-p "Do you want to start IRC? ") (when (y-or-n-p "Do you want to start IRC? ")
(erc :server "irc.freenode.net" :port 6667 :nick "bozhidar"))) (erc :server "irc.freenode.net" :port 6667 :nick erc-nick)))
(defun filter-server-buffers () (defun filter-server-buffers ()
(delq nil (delq nil

18
samples/personal-erc.el Normal file
View file

@ -0,0 +1,18 @@
;; Join the a couple of interesting channels whenever connecting to Freenode.
(setq erc-autojoin-channels-alist '(("freenode.net"
"#emacs" "#ruby" "#lisp" "#clojure"
"#scala" "#haskell")))
;; set your nickname
(setq erc-nick "bozhidar")
;; share your username (optional)
(setq erc-user-full-name "Bozhidar Batsov")
;; auto identify
(when (file-exists-p (expand-file-name "~/.ercpass"))
(load "~/.ercpass")
(require 'erc-services)
(erc-services-mode 1)
(setq erc-prompt-for-nickserv-password nil)
(setq erc-nickserv-passwords
`((freenode ((erc-nick . ,erc-pass))))))