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

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

[elpa] externals/ivy-explorer 384e241 18/29: Use ivy posframe dispatchin


From: Clemens Radermacher
Subject: [elpa] externals/ivy-explorer 384e241 18/29: Use ivy posframe dispatching done when using posframe
Date: Tue, 12 Mar 2019 09:04:36 -0400 (EDT)

branch: externals/ivy-explorer
commit 384e241fe6db881b723425cb0c9ec16de454aaa9
Author: Clemens Radermacher <address@hidden>
Commit: Clemens Radermacher <address@hidden>

    Use ivy posframe dispatching done when using posframe
---
 ivy-explorer.el | 17 +++++++++++------
 1 file changed, 11 insertions(+), 6 deletions(-)

diff --git a/ivy-explorer.el b/ivy-explorer.el
index 6f069f0..d7eeebb 100644
--- a/ivy-explorer.el
+++ b/ivy-explorer.el
@@ -672,12 +672,17 @@ Call the permanent action if possible.")
 (defun ivy-explorer-dispatching-done ()
   "Select one of the available actions and call `ivy-done'."
   (interactive)
-  (let ((window (selected-window)))
-    (unwind-protect
-        (when (ivy-read-action)
-          (ivy-done))
-      (when (window-live-p window)
-        (window-resize nil (- 1 (window-height)))))))
+  (cond ((get-buffer ivy-explorer--posframe-buffer)
+         (unless (require 'ivy-posframe nil t)
+           (user-error "Ivy posframe not found"))
+         (ivy-posframe-dispatching-done))
+        (t
+         (let ((window (selected-window)))
+           (unwind-protect
+               (when (ivy-read-action)
+                 (ivy-done))
+             (when (window-live-p window)
+               (window-resize nil (- 1 (window-height)))))))))
 
 
 (defun ivy-explorer (&rest args)



reply via email to

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