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

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

[elpa] master 970b984 01/54: Fix up ivy-recentf and ivy-switch-buffer wi


From: Oleh Krehel
Subject: [elpa] master 970b984 01/54: Fix up ivy-recentf and ivy-switch-buffer window-wise
Date: Tue, 29 Sep 2015 14:09:46 +0000

branch: master
commit 970b98417ecb6b4a7b768760984e492e0242d914
Author: Oleh Krehel <address@hidden>
Commit: Oleh Krehel <address@hidden>

    Fix up ivy-recentf and ivy-switch-buffer window-wise
    
    * ivy.el (ivy--switch-buffer-action):
    (ivy-recentf): Use `with-ivy-window'.
---
 ivy.el |   22 +++++++++++++---------
 1 files changed, 13 insertions(+), 9 deletions(-)

diff --git a/ivy.el b/ivy.el
index 21197c3..6aa06a7 100644
--- a/ivy.el
+++ b/ivy.el
@@ -1556,15 +1556,16 @@ When VIRTUAL is non-nil, add virtual buffers."
 (defun ivy--switch-buffer-action (buffer)
   "Switch to BUFFER.
 BUFFER may be a string or nil."
-  (if (zerop (length buffer))
-      (switch-to-buffer
-       ivy-text nil 'force-same-window)
-    (let ((virtual (assoc buffer ivy--virtual-buffers)))
-      (if (and virtual
-               (not (get-buffer buffer)))
-          (find-file (cdr virtual))
+  (with-ivy-window
+    (if (zerop (length buffer))
         (switch-to-buffer
-         buffer nil 'force-same-window)))))
+         ivy-text nil 'force-same-window)
+      (let ((virtual (assoc buffer ivy--virtual-buffers)))
+        (if (and virtual
+                 (not (get-buffer buffer)))
+            (find-file (cdr virtual))
+          (switch-to-buffer
+           buffer nil 'force-same-window))))))
 
 (defun ivy--switch-buffer-other-window-action (buffer)
   "Switch to BUFFER in other window.
@@ -1605,7 +1606,10 @@ BUFFER may be a string or nil."
   "Find a file on `recentf-list'."
   (interactive)
   (ivy-read "Recentf: " recentf-list
-            :action #'find-file))
+            :action
+            (lambda (f)
+              (with-ivy-window
+                (find-file f)))))
 
 (defun ivy-yank-word ()
   "Pull next word from buffer into search string."



reply via email to

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