[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/org-real c32c714 074/160: Org real headlines takes over
From: |
ELPA Syncer |
Subject: |
[elpa] externals/org-real c32c714 074/160: Org real headlines takes over current window |
Date: |
Wed, 6 Oct 2021 16:58:18 -0400 (EDT) |
branch: externals/org-real
commit c32c7142f23bf0cec080c38f115e219b60947278
Author: Tyler Grinn <tylergrinn@gmail.com>
Commit: Tyler Grinn <tylergrinn@gmail.com>
Org real headlines takes over current window
---
org-real.el | 16 +++++++++++-----
1 file changed, 11 insertions(+), 5 deletions(-)
diff --git a/org-real.el b/org-real.el
index c96bc61..4381146 100644
--- a/org-real.el
+++ b/org-real.el
@@ -142,7 +142,10 @@
MAX-LEVEL is the maximum level to show headlines for."
(interactive "P")
- (org-real--pp (org-real--parse-headlines (or max-level 2))))
+ (org-real--pp
+ (org-real--parse-headlines (or max-level 2))
+ nil
+ 'display-buffer-same-window))
;;;; Org Real mode
@@ -223,18 +226,22 @@ The following commands are available:
;;;; Pretty printing
-(defun org-real--pp (box &optional containers)
+(defun org-real--pp (box &optional containers display-buffer-fn)
"Pretty print BOX in a popup buffer.
If CONTAINERS is passed in, also pretty print a sentence
-describing where BOX is."
+describing where BOX is.
+
+DISPLAY-BUFFER-FN is used to display the diagram, by
+default `display-buffer-pop-up-window'."
(let ((top (org-real--get-top box))
(width (org-real--get-width box))
(height (org-real--get-height box))
(inhibit-read-only t)
(buffer (get-buffer-create "Org Real")))
(select-window (display-buffer buffer
- `(display-buffer-pop-up-window
+ `(,(or display-buffer-fn
+ 'display-buffer-pop-up-window)
(window-width . ,width)
(window-height . ,height))))
(org-real-mode)
@@ -1173,7 +1180,6 @@ MARKER is the position of the first occurrence of the
link."
(let ((buffer (marker-buffer marker)))
(lambda ()
(interactive)
- (delete-window)
(if-let ((window (get-buffer-window buffer)))
(select-window window)
(switch-to-buffer buffer))
- [elpa] externals/org-real 9554940 135/160: Typo in jumping to rel box, (continued)
- [elpa] externals/org-real 9554940 135/160: Typo in jumping to rel box, ELPA Syncer, 2021/10/06
- [elpa] externals/org-real 878480b 134/160: Merge branch 'main' into next, ELPA Syncer, 2021/10/06
- [elpa] externals/org-real 26ade6a 136/160: Bump version, ELPA Syncer, 2021/10/06
- [elpa] externals/org-real 44e82f9 120/160: Added calculate functionality to is-visible, ELPA Syncer, 2021/10/06
- [elpa] externals/org-real c916d88 142/160: Draw selected box last, ELPA Syncer, 2021/10/06
- [elpa] externals/org-real 3618967 137/160: Merge branch 'next' into 'main', ELPA Syncer, 2021/10/06
- [elpa] externals/org-real f933ebc 055/160: More edge cases, ELPA Syncer, 2021/10/06
- [elpa] externals/org-real b32309c 056/160: Don't highlight children when following link, ELPA Syncer, 2021/10/06
- [elpa] externals/org-real 52f3d15 063/160: Satisfy elc compiler, ELPA Syncer, 2021/10/06
- [elpa] externals/org-real cbadc3a 065/160: Merge branch 'next' into 'main', ELPA Syncer, 2021/10/06
- [elpa] externals/org-real c32c714 074/160: Org real headlines takes over current window,
ELPA Syncer <=
- [elpa] externals/org-real 4e903f9 090/160: Draw without canvas: no more whitespace around box diagram, ELPA Syncer, 2021/10/06
- [elpa] externals/org-real 61eea2d 091/160: Auto-fill description when inserting link, ELPA Syncer, 2021/10/06
- [elpa] externals/org-real 35c3857 106/160: Added metadata slot, ELPA Syncer, 2021/10/06
- [elpa] externals/org-real e9f758a 102/160: Fully expand siblings when toggling global visibility, ELPA Syncer, 2021/10/06
- [elpa] externals/org-real 7d5574d 126/160: Adding margin and padding tests, ELPA Syncer, 2021/10/06
- [elpa] externals/org-real da816c2 122/160: Merge branch 'next' into 'main', ELPA Syncer, 2021/10/06
- [elpa] externals/org-real b4373e7 123/160: Only flex adjusting necessary boxes, ELPA Syncer, 2021/10/06
- [elpa] externals/org-real c5fc5a2 127/160: Merge branch 'next' into 'main', ELPA Syncer, 2021/10/06
- [elpa] externals/org-real 58989c3 121/160: Use cartesian distance for cycle up/down, ELPA Syncer, 2021/10/06
- [elpa] externals/org-real e4abd0e 118/160: Reworked flexible layout, ELPA Syncer, 2021/10/06