08-messaging.el 966 Bytes
Newer Older
Duncan Bayne's avatar
Duncan Bayne committed
1 2 3 4 5
;;
;; Thanks to:
;; + https://www.emacswiki.org/emacs/ErcSASL
;;

6 7
(utils/add-to-load-path '("~/.emacs.d/emotion-iconous-mode"))
(utils/add-to-load-path '("~/.emacs.d/erc-sasl"))
8 9

(require 'emotion-iconous-mode)
Duncan Bayne's avatar
Duncan Bayne committed
10
(require 'erc)
Duncan Bayne's avatar
Duncan Bayne committed
11 12 13
(require 'erc-sasl)

(add-to-list 'erc-sasl-server-regexp-list ".*")
14

15 16
(add-hook 'term-mode-hook 'utils/disable-linum-mode)
(add-hook 'jabber-chat-mode-hook 'utils/disable-linum-mode)
17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34

(defun hipchat-join (room)
  (interactive "sRoom name: ")
  (jabber-groupchat-join
    (jabber-read-account)
    (concat hipchat-number "_" room "@conf.hipchat.com")
    hipchat-nickname
    t)
  (require 'jabber-emoicon))
(custom-set-variables '(jabber-auto-reconnect t))

(add-hook 'jabber-alert-message-hooks 'jabber-message-beep)

(defun my-message-mode-setup ()
  (setq fill-column 72)
  (turn-on-auto-fill))
(add-hook 'message-mode-hook 'my-message-mode-setup)

35
(utils/set-mode
36 37 38
  'mail-mode
  '("\\.eml$"))
(add-hook 'mail-mode-hook 'auto-fill-mode)