[elpa] master eb13008 05/13: posframe: let posframe-hide work when buffer is killed

[Feng Shu]

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

    posframe: let posframe-hide work when buffer is killed
    
    * posframe.el (posframe-hide): Let posframe-hide work when posframe-buffer 
is killed.
---
 posframe.el | 8 +++++---
 1 file changed, 5 insertions(+), 3 deletions(-)

diff --git a/posframe.el b/posframe.el
index 72a67d0..f073657 100644
--- a/posframe.el
+++ b/posframe.el
@@ -468,9 +468,11 @@ WIDTH and MIN-WIDTH."
 
 (defun posframe-hide (posframe-buffer)
   "Hide posframe which buffer is POSFRAME-BUFFER."
-  (with-current-buffer (get-buffer-create posframe-buffer)
-    (when (frame-live-p posframe--frame)
-      (make-frame-invisible posframe--frame))))
+  (dolist (frame (frame-list))
+    (let ((buffer (frame-parameter frame 'posframe-buffer)))
+      (when (or (equal posframe-buffer (car buffer))
+                (equal posframe-buffer (cdr buffer)))
+        (make-frame-invisible frame)))))
 
 (defun posframe-delete (posframe-buffer)
   "Delete posframe which buffer POSFRAME-BUFFER."