Do not try to use dbus when showing notifications under windows

This commit is contained in:
Daniel Borchmann 2020-06-08 12:51:10 +02:00
parent 4dac319ff7
commit a6776f1fe4
Signed by: exot
GPG Key ID: 1C7071A75BB72D64

53
init.el
View File

@ -916,29 +916,36 @@ With given ARG, display files in `db/important-document-path."
(use-package org-clock (use-package org-clock
:defer t :defer t
:commands (org-clock-save) :commands (org-clock-save)
:init (setq org-clock-history-length 23 :init (progn
org-clock-in-resume t (setq org-clock-history-length 23
org-clock-into-drawer t org-clock-in-resume t
org-clock-idle-time nil org-clock-into-drawer t
org-clock-out-remove-zero-time-clocks t org-clock-idle-time nil
org-clock-out-when-done '("DONE" "CANC" "WAIT" "HOLD") org-clock-out-remove-zero-time-clocks t
org-clock-auto-clock-resolution 'when-no-clock-is-running org-clock-out-when-done '("DONE" "CANC" "WAIT" "HOLD")
org-clock-mode-line-total 'auto org-clock-auto-clock-resolution 'when-no-clock-is-running
org-clock-report-include-clocking-task t org-clock-mode-line-total 'auto
org-clock-in-switch-to-state (lambda (_) org-clock-report-include-clocking-task t
(when (not org-clock-in-switch-to-state (lambda (_)
(and (boundp 'org-capture-mode) (when (not
org-capture-mode)) (and (boundp 'org-capture-mode)
(cond org-capture-mode))
((member (org-get-todo-state) (cond
(list "TODO" "READ")) ((member (org-get-todo-state)
"CONT") (list "TODO" "READ"))
((member (org-get-todo-state) "CONT")
(list "GOTO")) ((member (org-get-todo-state)
"ATTN")))) (list "GOTO"))
org-clock-persist t "ATTN"))))
org-clock-persist-query-resume nil org-clock-persist t
org-time-stamp-rounding-minutes '(1 1)) org-clock-persist-query-resume nil
org-time-stamp-rounding-minutes '(1 1))
;; On Windows, we don't have dbus to show notifications; default to
;; `message' instead
(when on-windows
(setq org-show-notification-handler #'message)))
:config (progn :config (progn
(org-clock-persistence-insinuate) (org-clock-persistence-insinuate)