From 27bec00a60cafcc60ffa11e1d62b3d5c0ef6d4e7 Mon Sep 17 00:00:00 2001 From: Nicolas Goaziou Date: Fri, 29 Apr 2016 11:35:49 +0200 Subject: [PATCH] org-agenda: Remove unnecessary visibility modification * lisp/org.el (org-show-context-detail): Change default visibility span for agenda context. * lisp/org-agenda.el (org-agenda-goto): (org-agenda-todo): (org-agenda-add-note): (org-agenda-priority): (org-agenda-set-tags): (org-agenda-set-property): (org-agenda-set-effort): (org-agenda-toggle-archive-tag): (org-agenda-clock-in): Special visibility is taken care of by `org-show-context'. Do not hard-code anything else. * contrib/lisp/org-contacts.el (org-contacts-gnus-article-from-goto): Special visibility is taken care of by `org-show-context'. Do not hard-code anything else. --- org-contacts.el | 7 +------ 1 file changed, 1 insertion(+), 6 deletions(-) diff --git a/org-contacts.el b/org-contacts.el index 1aa2cab..13fbf27 100644 --- a/org-contacts.el +++ b/org-contacts.el @@ -675,12 +675,7 @@ description." (when marker (switch-to-buffer-other-window (marker-buffer marker)) (goto-char marker) - (when (eq major-mode 'org-mode) - (org-show-context 'agenda) - (save-excursion - (and (outline-next-heading) - ;; show the next heading - (org-flag-heading nil))))))) + (when (eq major-mode 'org-mode) (org-show-context 'agenda))))) (org-no-warnings (defvar date)) ;; unprefixed, from calendar.el (defun org-contacts-anniversaries (&optional field format)