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

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

[elpa] externals/ivy-posframe d6b3722 2/4: Fix display-function warn


From: Feng Shu
Subject: [elpa] externals/ivy-posframe d6b3722 2/4: Fix display-function warn
Date: Sat, 3 Oct 2020 18:57:15 -0400 (EDT)

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

    Fix display-function warn
    
    * ivy-posframe.el (ivy-posframe-read-action)
    (ivy-posframe-read-action-by-key): Deal with display-function compile warn.
---
 ivy-posframe.el | 13 ++++++-------
 1 file changed, 6 insertions(+), 7 deletions(-)

diff --git a/ivy-posframe.el b/ivy-posframe.el
index f9c37e4..ef77056 100644
--- a/ivy-posframe.el
+++ b/ivy-posframe.el
@@ -353,17 +353,17 @@ This variable is useful for `ivy-posframe-read-action' .")
 (defun ivy-posframe-read-action ()
   "Ivy-posframe version `ivy-read-action'"
   (interactive)
-  (let* ((ivy-read-action-function #'ivy-posframe-read-action-by-key)
-         (caller (ivy-state-caller ivy-last))
-         (display-function
-          (or ivy--display-function
-              (cdr (or (assq caller ivy-display-functions-alist)
-                       (assq t ivy-display-functions-alist))))))
+  (let* ((ivy-read-action-function #'ivy-posframe-read-action-by-key))
     (call-interactively #'ivy-read-action)))
 
 (defun ivy-posframe-read-action-by-key (actions)
   "Ivy-posframe's `ivy-read-action-by-key'."
   (let* ((set-message-function nil)
+         (caller (ivy-state-caller ivy-last))
+         (display-function
+          (or ivy--display-function
+              (cdr (or (assq caller ivy-display-functions-alist)
+                       (assq t ivy-display-functions-alist)))))
          (hint (funcall ivy-read-action-format-function (cdr actions)))
          (resize-mini-windows t)
          (key "")
@@ -373,7 +373,6 @@ This variable is useful for `ivy-posframe-read-action' .")
                                     (string-prefix-p key (car x)))
                                   (cdr actions)))
                 (not (string= key (car (nth action-idx (cdr actions))))))
-      ;; NOTE: (setq key xxx) is only different from `ivy-read-action-by-key'
       (setq key (concat key (string
                              (read-key
                               (if (functionp display-function)



reply via email to

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