[elpa] master d2a9f20 09/13: posframe: deal with killed buffer

[Feng Shu]

branch: master
commit d2a9f2024fbb2416344826f7669947bedadff8c8
Author: Feng Shu <address@hidden>
Commit: Feng Shu <address@hidden>

    posframe: deal with killed buffer
    
    * posframe.el (posframe--delete-frame): Deal with killed buffer
---
 posframe.el | 14 ++++++++------
 1 file changed, 8 insertions(+), 6 deletions(-)

diff --git a/posframe.el b/posframe.el
index 8669868..42b774f 100644
--- a/posframe.el
+++ b/posframe.el
@@ -483,14 +483,16 @@ WIDTH and MIN-WIDTH."
   "Kill child-frame of posframe.
 This posframe's buffer is POSFRAME-BUFFER."
   (dolist (frame (frame-list))
-    (let ((buffer-info (frame-parameter frame 'posframe-buffer)))
+    (let ((buffer-info (frame-parameter frame 'posframe-buffer))
+          (buffer (get-buffer posframe-buffer)))
       (when (or (equal posframe-buffer (car buffer-info))
                 (equal posframe-buffer (cdr buffer-info)))
-        (with-current-buffer (get-buffer posframe-buffer)
-          (dolist (timer '(posframe--refresh-timer
-                           posframe--timeout-timer))
-            (when (timerp timer)
-              (cancel-timer timer))))
+        (when buffer
+          (with-current-buffer buffer
+            (dolist (timer '(posframe--refresh-timer
+                             posframe--timeout-timer))
+              (when (timerp timer)
+                (cancel-timer timer)))))
         (delete-frame frame)))))
 
 (defun posframe--kill-buffer (posframe-buffer)