[elpa] externals/gnorb de3182e 263/449: Shift location of org-reveal during trigger process

[Stefan Monnier]

branch: externals/gnorb
commit de3182eee59bfffc70b69e55bd8fa64a2f2ec24a
Author: Eric Abrahamsen <eric@ericabrahamsen.net>
Commit: Eric Abrahamsen <eric@ericabrahamsen.net>

    Shift location of org-reveal during trigger process
    
    * gnorb-org.el (gnorb-org-restore-after-send): Remove it from here.
    * gnorb-utils.el (gnorb-trigger-todo-action): Add it here.
    
    Make sure it applies every time we're triggering.
---
 gnorb-org.el   | 1 -
 gnorb-utils.el | 2 ++
 2 files changed, 2 insertions(+), 1 deletion(-)

diff --git a/gnorb-org.el b/gnorb-org.el
index 46a95a0..5a21701 100644
--- a/gnorb-org.el
+++ b/gnorb-org.el
@@ -143,7 +143,6 @@ might have been in the outgoing message's headers and call
   (delete-other-windows)
   (dolist (id gnorb-message-org-ids)
     (org-id-goto id)
-    (org-reveal)
     (gnorb-trigger-todo-action nil id))
   ;; this is a little unnecessary, but it may save grief
   (setq gnorb-gnus-message-info nil)
diff --git a/gnorb-utils.el b/gnorb-utils.el
index b3fc3a7..01a5e16 100644
--- a/gnorb-utils.el
+++ b/gnorb-utils.el
@@ -237,6 +237,8 @@ agenda. Then let the user choose an action from the value of
           (save-excursion
             (org-id-goto id)
             (move-marker root-marker (point-at-bol)))))
+    (unless agenda-p
+      (org-reveal))
     ;; Query about attaching email attachments.
     (org-with-point-at root-marker
       (map-y-or-n-p