Fix Warning: ‘org-show-context’ is an obsolete function (as of 9.6); use ‘org-fold-show-context’ instead.

This commit is contained in:
stardiviner 2022-06-04 08:58:26 +08:00
parent 0501463909
commit 02ac3ed9d0

View file

@ -742,7 +742,10 @@ Usage: (add-hook 'completion-at-point-functions 'org-contacts-org-complete-funct
(when marker (when marker
(switch-to-buffer-other-window (marker-buffer marker)) (switch-to-buffer-other-window (marker-buffer marker))
(goto-char marker) (goto-char marker)
(when (eq major-mode 'org-mode) (org-show-context 'agenda))))) (when (eq major-mode 'org-mode)
(if (fboundp 'org-fold-show-context)
(org-fold-show-context 'agenda)
(org-show-context 'agenda))))))
(with-no-warnings (defvar date)) ;; unprefixed, from calendar.el (with-no-warnings (defvar date)) ;; unprefixed, from calendar.el
(defun org-contacts-anniversaries (&optional field format) (defun org-contacts-anniversaries (&optional field format)