;; erc-desktop-notifications.el -- Send notification on PRIVMSG or mentions
-;; Copyright (C) 2012-2013 Free Software Foundation, Inc.
+;; Copyright (C) 2012-2015 Free Software Foundation, Inc.
;; Author: Julien Danjou <julien@danjou.info>
;; Keywords: comm
:group 'erc-notifications
:type '(choice (const :tag "No icon" nil) file))
+(defcustom erc-notifications-bus :session
+ "D-Bus bus to use for notification."
+ :version "25.1"
+ :group 'erc-notifications
+ :type '(choice (const :tag "Session bus" :session) string))
+
+(defvar dbus-debug) ; used in the macroexpansion of dbus-ignore-errors
+
(defun erc-notifications-notify (nick msg)
"Notify that NICK send some MSG.
This will replace the last notification sent with this function."
(dbus-ignore-errors
(setq erc-notifications-last-notification
- (notifications-notify :title (xml-escape-string nick)
+ (notifications-notify :bus erc-notifications-bus
+ :title (xml-escape-string nick)
:body (xml-escape-string msg)
:replaces-id erc-notifications-last-notification
:app-icon erc-notifications-icon))))