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

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

[elpa] externals/posframe 1fd8c8c 13/40: Remove unused bindings in 'posf


From: Feng Shu
Subject: [elpa] externals/posframe 1fd8c8c 13/40: Remove unused bindings in 'posframe-hide-all' and 'posframe-delete-all'
Date: Wed, 5 Feb 2020 04:27:18 -0500 (EST)

branch: externals/posframe
commit 1fd8c8ce40a38eafb3fb272b1964e376468e5bf1
Author: Štěpán Němec <address@hidden>
Commit: Štěpán Němec <address@hidden>

    Remove unused bindings in 'posframe-hide-all' and 'posframe-delete-all'
---
 posframe.el | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/posframe.el b/posframe.el
index c079633..b0f01ca 100644
--- a/posframe.el
+++ b/posframe.el
@@ -712,16 +712,16 @@ passing remaining ARGUMENTS to it."
   "Hide all posframe's frames."
   (interactive)
   (dolist (frame (frame-list))
-    (let ((buffer-info (frame-parameter frame 'posframe-buffer)))
-      (when buffer-info (posframe--make-frame-invisible frame)))))
+    (when (frame-parameter frame 'posframe-buffer)
+      (posframe--make-frame-invisible frame))))
 
 ;;;###autoload
 (defun posframe-delete-all ()
   "Delete all posframe's frames and buffers."
   (interactive)
   (dolist (frame (frame-list))
-    (let ((buffer-info (frame-parameter frame 'posframe-buffer)))
-      (when buffer-info (delete-frame frame))))
+    (when (frame-parameter frame 'posframe-buffer)
+      (delete-frame frame)))
   (dolist (buffer (buffer-list))
     (with-current-buffer buffer
       (when posframe--frame



reply via email to

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