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

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

[elpa] externals/popper b32abcba49 030/102: Fixed popup display of newly


From: ELPA Syncer
Subject: [elpa] externals/popper b32abcba49 030/102: Fixed popup display of newly created popup buffers
Date: Fri, 8 Sep 2023 15:58:51 -0400 (EDT)

branch: externals/popper
commit b32abcba493eae101206b1d7717a1783fc3d5be6
Author: Karthik Chikmagalur <karthikchikmagalur@gmail.com>
Commit: Karthik Chikmagalur <karthikchikmagalur@gmail.com>

    Fixed popup display of newly created popup buffers
---
 popper.el | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/popper.el b/popper.el
index a26e68461c..ae40653d4c 100644
--- a/popper.el
+++ b/popper.el
@@ -205,7 +205,9 @@ This is intended to be used in `display-buffer-alist'."
        (with-current-buffer buffer
          (eq popper-popup-status 'user-popup)))
       ('t (with-current-buffer buffer
-            (memq popper-popup-status '(popup user-popup)))))))
+            (or (memq popper-popup-status '(popup user-popup))
+                (unless (eq popper-popup-status 'raised)
+                  (popper-popup-p buffer))))))))
 
 (defun popper-group-by-directory ()
   "Return an identifier (default directory) to group popups.
@@ -254,7 +256,7 @@ Each element of the alist is a cons cell of the form 
(window . buffer)."
 (defun popper-update-popups ()
   "Update the list of currently open popups.
 
- Meant to be added to `window-configuration-change-hook'."
+ Intended to be added to `window-configuration-change-hook'."
   (let* ((open-buffers (mapcar #'window-buffer (window-list)))
          (open-popups (popper-find-popups open-buffers))
          (closed-popups (cl-remove-if-not



reply via email to

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