branch: externals/posframe
commit e4f171f2267efa29822c85318bcd2bf014137e58
Author: Feng Shu <tuma...@163.com>
Commit: Feng Shu <tuma...@163.com>
* posframe.el (posframe-funcall): New function.
---
posframe.el | 10 ++++++++++
1 file changed, 10 insertions(+)
diff --git a/posframe.el b/posframe.el
index 6fc32c6..01ce127 100644
--- a/posframe.el
+++ b/posframe.el
@@ -666,6 +666,16 @@ This posframe's buffer is POSFRAME-BUFFER."
(when (buffer-live-p posframe-buffer)
(kill-buffer posframe-buffer)))
+(defun posframe-funcall (posframe-buffer function &rest arguments)
+ "Select posframe of POSFRAME-BUFFER's, and call FUNCTION.
+passing remaining arguments to it."
+ (when (get-buffer posframe-buffer)
+ (with-current-buffer posframe-buffer
+ (when (framep posframe--frame)
+ (with-selected-frame posframe--frame
+ (when (functionp function)
+ (apply function arguments)))))))
+
;;;###autoload
(defun posframe-hide-all ()
"Hide all posframe's frames."
