[elpa] externals/org-real fb056dc 078/160: Reuse window if org real diagram already visible

[ELPA Syncer]

branch: externals/org-real
commit fb056dc43787d8dfe10e71f801c65028a3fb09c2
Author: Tyler Grinn <tylergrinn@gmail.com>
Commit: Tyler Grinn <tylergrinn@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 c0fa26e..fbfc1c8 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)