[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."