branch: externals/org-real
commit 3b123018dd7d1de243cdce050dde7e97c28f7347
Author: Amy Grinn <grinn....@gmail.com>
Commit: Amy Grinn <grinn....@gmail.com>
Reuse window if org real diagram already visible
---
org-real.el | 11 ++++++-----
1 file changed, 6 insertions(+), 5 deletions(-)
diff --git a/org-real.el b/org-real.el
index c0fa26eafd..fbfc1c83c1 100644
--- a/org-real.el
+++ b/org-real.el
@@ -326,11 +326,12 @@ visibility."
(let* ((width (apply 'max (mapcar 'length (split-string (buffer-string)
"\n"))))
(height (count-lines (point-min) (point-max)))
(buffer (get-buffer-create "Org Real"))
- (window (display-buffer buffer
- `(,(or display-buffer-fn
- 'display-buffer-pop-up-window)
- (window-width . ,width)
- (window-height . ,height)))))
+ (window (or (get-buffer-window buffer)
+ (display-buffer buffer
+ `(,(or display-buffer-fn
+ 'display-buffer-pop-up-window)
+ (window-width . ,width)
+ (window-height . ,height))))))
(if select (select-window window))))))
(defun org-real--pp-text (containers)
