.emacs.d/site-lisp/oni.el

This commit is contained in:
Tom Willemsen 2012-10-17 00:38:18 +02:00
parent 61a0d711cd
commit e3a2616488

View file

@ -24,6 +24,8 @@
;;; Code:
(autoload 'notifications-notify "notifications")
(defmacro oni:define-mailbox (name email &optional signature longname)
"Define a mailbox function for mailbox NAME with address EMAIL.
Optionally set signature to SIGNATURE and use LONGNAME as the
@ -217,6 +219,10 @@ If COUNT has been specified indent by that much, otherwise look at
(setq count tab-width))
(indent-rigidly start end count)))
(defun oni:jabber-alert-message-func (from buffer text title)
(notifications-notify :title title
:body text))
(defun oni:jabber-chat-mode-func ()
"Function for `jabber-chat-mode-hook'."
(visual-line-mode)