Prevent Org mode from mistakenly changing Calendar keymap

* lisp/org/org-compat.el (org--setup-calendar-bindings): Fix logic
in test of 'org-agenda-diary-file' (bug#48199).
This commit is contained in:
Stephen Berman 2021-06-25 11:11:43 +02:00
parent 3c674ffcca
commit 19f2f26994

View file

@ -1151,8 +1151,8 @@ key."
((guard (not (lookup-key calendar-mode-map "c")))
(local-set-key "c" #'org-calendar-goto-agenda))
(_ nil))
(unless (and (boundp 'org-agenda-diary-file)
(eq org-agenda-diary-file 'diary-file))
(when (and (boundp 'org-agenda-diary-file)
(not (eq org-agenda-diary-file 'diary-file)))
(local-set-key org-calendar-insert-diary-entry-key
#'org-agenda-diary-entry)))