(require 'notifications) (setq dbus-debug t) (notifications-notify :timeout 1000) (defun my-test () (let ((ct (current-idle-time))) (message (format "idle time: %f" (if ct (+ (cadr ct) (/ (nth 2 ct) 1000000.0)) 0))))) (run-with-timer 1.5 nil 'my-test)