branch: externals/ivy-posframe
commit e27b2b7c75ff4cef749dcb311bcf07c637ae59e9
Author: Feng Shu <tuma...@163.com>
Commit: Feng Shu <tuma...@163.com>

    Remove ivy-posframe-additional-display-functions
---
 ivy-posframe.el | 16 ++--------------
 1 file changed, 2 insertions(+), 14 deletions(-)

diff --git a/ivy-posframe.el b/ivy-posframe.el
index bcf1068..691002a 100644
--- a/ivy-posframe.el
+++ b/ivy-posframe.el
@@ -136,7 +136,7 @@
 ;; #+BEGIN_EXAMPLE
 ;; (defun ivy-posframe-display-at-XXX (str)
 ;;   (ivy-posframe--display str #'your-own-poshandler-function))
-;; (push 'ivy-posframe-display-at-XXX 
ivy-posframe-additional-display-functions) ; This line is needed.
+;; (setq ivy-posframe-display-functions-alist '((t . 
ivy-posframe-display-at-XXX)))
 ;; (ivy-posframe-mode 1) ; This line is needed.
 ;; #+END_EXAMPLE
 
@@ -208,11 +208,6 @@ When 0, no border is showed."
   :group 'ivy-posframe
   :type 'sexp)
 
-(defcustom ivy-posframe-additional-display-functions nil
-  "The additional display functions"
-  :group 'ivy-posframe
-  :type 'sexp)
-
 (defface ivy-posframe
   '((t (:inherit default)))
   "Face used by the ivy-posframe."
@@ -491,14 +486,7 @@ selection, non-nil otherwise."
                  (mapcar
                   (lambda (elm)
                     `(,elm :cleanup ivy-posframe-cleanup))
-                  `(,@ivy-posframe-additional-display-functions
-                    ivy-posframe-display
-                    ivy-posframe-display-at-window-center
-                    ivy-posframe-display-at-frame-center
-                    ivy-posframe-display-at-window-bottom-left
-                    ivy-posframe-display-at-frame-bottom-left
-                    ivy-posframe-display-at-frame-bottom-window-center
-                    ivy-posframe-display-at-point)))))
+                  (mapcar #'cdr ivy-posframe-display-functions-alist)))))
     (apply fn args)))
 
 (defun ivy-posframe--height (fn &rest args)

Reply via email to