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

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

[elpa] externals/posframe f134023: * posframe.el (posframe-show): make s


From: ELPA Syncer
Subject: [elpa] externals/posframe f134023: * posframe.el (posframe-show): make sure window live before set window point.
Date: Thu, 15 Apr 2021 20:57:09 -0400 (EDT)

branch: externals/posframe
commit f1340238a6dae5d0de9c9586141ff0b4d3d7587b
Author: Feng Shu <tumashu@163.com>
Commit: Feng Shu <tumashu@163.com>

    * posframe.el (posframe-show): make sure window live before set window  
point.
    
    Fix: Error: wrong-type-argument window-live-p #<window 114> #96
---
 posframe.el | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/posframe.el b/posframe.el
index 835324d..94b5879 100644
--- a/posframe.el
+++ b/posframe.el
@@ -755,7 +755,9 @@ You can use `posframe-delete-all' to delete all posframes."
        posframe refresh height min-height width min-width)
 
       ;; Make sure not hide buffer's content for scroll down.
-      (set-window-point (frame-root-window posframe--frame) 0)
+      (let ((window (frame-root-window posframe--frame)))
+        (when (window-live-p window)
+          (set-window-point window 0)))
 
       ;; Force raise the current posframe.
       (raise-frame posframe--frame)



reply via email to

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