.emacs.d/site-lisp/oni.el
This commit is contained in:
parent
61a0d711cd
commit
e3a2616488
1 changed files with 6 additions and 0 deletions
|
@ -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)
|
||||
|
|
Loading…
Reference in a new issue