;;; funcs.el --- Jabber layer functions File for Spacemacs ;; ;; Copyright (c) 2012-2017 Sylvain Benner & Contributors ;; ;; Author: Sylvain Benner ;; URL: https://github.com/syl20bnr/spacemacs ;; ;; This file is not part of GNU Emacs. ;; ;;; License: GPLv3 (defun spacemacs/jabber-connect-hook (jc) (jabber-send-presence "" "Online" 10) (jabber-whitespace-ping-start) ;; Disable the minibuffer getting jabber messages when active ;; See http://www.emacswiki.org/JabberEl (define-jabber-alert echo "Show a message in the echo area" (lambda (msg) (unless (minibuffer-prompt) (message "%s" msg)))))