Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Branch: master
Fetching contributors…

Cannot retrieve contributors at this time

12 lines (9 sloc) 0.463 kB
(defpackage #:notify-example
(:use #:cl #:dbus)
(:export #:notify-example))
(in-package #:notify-example)
(defun notify-example ()
(with-open-bus (bus (session-server-addresses))
(with-introspected-object (notifications bus "/org/freedesktop/Notifications" "org.freedesktop.Notifications")
(notifications "org.freedesktop.Notifications" "Notify"
"Test" 0 "" "Test" "This is a test; I repeat, this is a test." '() '() -1))))
Jump to Line
Something went wrong with that request. Please try again.