emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/boxy 27fd4fcecc 2/3: Revert "Using org reveal after nav


From: ELPA Syncer
Subject: [elpa] externals/boxy 27fd4fcecc 2/3: Revert "Using org reveal after navigating to a box"
Date: Tue, 10 May 2022 10:57:19 -0400 (EDT)

branch: externals/boxy
commit 27fd4fceccdcefc6e272cb4961a8f0f59d017cd3
Author: Tyler Grinn <tylergrinn@gmail.com>
Commit: Tyler Grinn <tylergrinn@gmail.com>

    Revert "Using org reveal after navigating to a box"
    
    This reverts commit 57310c19a7e8afd8a87ab701d5f9c0102b42dd1d.
---
 boxy.el | 13 ++++---------
 1 file changed, 4 insertions(+), 9 deletions(-)

diff --git a/boxy.el b/boxy.el
index 6fb05bbcd5..465e3a4c27 100644
--- a/boxy.el
+++ b/boxy.el
@@ -3,7 +3,7 @@
 ;; Copyright (C) 2021 Free Software Foundation, Inc.
 
 ;; Author: Tyler Grinn <tylergrinn@gmail.com>
-;; Version: 1.0.6
+;; Version: 1.0.5
 ;; File: boxy.el
 ;; Package-Requires: ((emacs "26.1"))
 ;; Keywords: tools
@@ -1149,8 +1149,7 @@ If INCLUDE-ON-TOP is non-nil, also include height on top 
of box."
     (let ((marker (car (oref box markers))))
       (save-selected-window
         (switch-to-buffer-other-window (marker-buffer marker))
-        (goto-char (marker-position marker))
-        (org-reveal))
+        (goto-char (marker-position marker)))
       (object-remove-from-list box :markers marker)
       (object-add-to-list box :markers marker t))))
 
@@ -1164,9 +1163,7 @@ If INCLUDE-ON-TOP is non-nil, also include height on top 
of box."
       (if-let ((window (get-buffer-window buffer)))
             (select-window window)
           (switch-to-buffer buffer))
-      (goto-char (marker-position marker))
-      (org-reveal))))
-  
+        (goto-char (marker-position marker)))))
 
 (defun boxy-button-jump-all (box)
   "View all occurrences of links from BOX in the same window."
@@ -1179,12 +1176,10 @@ If INCLUDE-ON-TOP is non-nil, also include height on 
top of box."
           (error "To many buffers to visit simultaneously"))
       (switch-to-buffer (marker-buffer marker))
       (goto-char (marker-position marker))
-      (org-reveal)
       (dolist (marker (cdr markers))
         (select-window (split-window nil size))
         (switch-to-buffer (marker-buffer marker))
-        (goto-char (marker-position marker))
-        (org-reveal)))))
+        (goto-char (marker-position marker))))))
 
 (defun boxy-button-jump-rel (box)
   "Jump to the box directly related to BOX."



reply via email to

[Prev in Thread] Current Thread [Next in Thread]