[elpa] scratch/org-contacts-rebased 3ed6376 086/118: org-agenda: Remove unnecessary visibility modification

[Stefan Monnier]

branch: scratch/org-contacts-rebased
commit 3ed637627299357192da9ab26c39f912fbcfbbd7
Author: Nicolas Goaziou <mail@nicolasgoaziou.fr>
Commit: Nicolas Goaziou <mail@nicolasgoaziou.fr>

    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)