[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/ivy-explorer a09eb44 4/7: Add binding to switch to expl
From: |
Clemens Radermacher |
Subject: |
[elpa] externals/ivy-explorer a09eb44 4/7: Add binding to switch to explorer window |
Date: |
Wed, 16 Jan 2019 10:08:26 -0500 (EST) |
branch: externals/ivy-explorer
commit a09eb44d425ee70c4e3a539895b399a13d003e2d
Author: Clemens Radermacher <address@hidden>
Commit: Clemens Radermacher <address@hidden>
Add binding to switch to explorer window
---
ivy-explorer.el | 18 +++++++++++++++---
1 file changed, 15 insertions(+), 3 deletions(-)
diff --git a/ivy-explorer.el b/ivy-explorer.el
index 736016b..e948765 100644
--- a/ivy-explorer.el
+++ b/ivy-explorer.el
@@ -148,9 +148,14 @@ Even for the same string.")
(call-interactively ',cmd)
(ivy--exhibit))))
+(defun ivy-explorer-select-mini ()
+ (interactive)
+ (select-window (minibuffer-window)))
+
(defvar ivy-explorer-lv-mode-map
(let ((map (make-sparse-keymap)))
(prog1 map
+ (suppress-keymap map)
(define-key map (kbd "C-g") (defun ivy-explorer-lv-quit ()
(interactive)
(with-selected-window (minibuffer-window)
@@ -162,9 +167,8 @@ Even for the same string.")
(define-key map (kbd "RET") (ivy-explorer--lv-command ivy-alt-done))
(define-key map (kbd "DEL") (ivy-explorer--lv-command
ivy-backward-delete-char))
(define-key map "," (ivy-explorer--lv-command ivy-explorer-avy))
- (define-key map (kbd "C-x o") (defun ivy-explorer-select-mini ()
- (interactive)
- (select-window (minibuffer-window)))))))
+ (define-key map (kbd "C-x o") 'ivy-explorer-select-mini)
+ (define-key map (kbd "'") 'ivy-explorer-select-mini))))
(define-minor-mode ivy-explorer-lv-mode
"Mode for buffer showing the grid.")
@@ -418,10 +422,18 @@ Call the permanent action if possible.")
;; * Ivy explorer mode
+(defun ivy-explorer-select-lv ()
+ (interactive)
+ (select-window (get-buffer-window " *ivy-explorer*")))
+
(defvar ivy-explorer-map
(let ((map (make-sparse-keymap)))
(prog1 map
(define-key map (kbd "C-x d") 'ivy-explorer-dired)
+
+ (define-key map (kbd "C-x o") 'ivy-explorer-select-lv)
+ (define-key map (kbd "'") 'ivy-explorer-select-lv)
+
(define-key map (kbd "M-o") 'ivy-explorer-dispatching-done)
(define-key map (kbd "C-'") 'ivy-explorer-avy)
(define-key map (kbd ",") 'ivy-explorer-avy)
- [elpa] externals/ivy-explorer updated (0b1d286 -> be8008b), Clemens Radermacher, 2019/01/16
- [elpa] externals/ivy-explorer 7114ebe 2/7: Move to candidate which was current on exit when entering dired, Clemens Radermacher, 2019/01/16
- [elpa] externals/ivy-explorer 7a622c4 6/7: Add dispatch binding for explorer window, Clemens Radermacher, 2019/01/16
- [elpa] externals/ivy-explorer c8c6485 1/7: Let ivy-explorer-avy continue when entering directories, Clemens Radermacher, 2019/01/16
- [elpa] externals/ivy-explorer a09eb44 4/7: Add binding to switch to explorer window,
Clemens Radermacher <=
- [elpa] externals/ivy-explorer 863391e 3/7: Allow switching to lv-window and allow modal navigation in it, Clemens Radermacher, 2019/01/16
- [elpa] externals/ivy-explorer be8008b 7/7: Version bump, Clemens Radermacher, 2019/01/16
- [elpa] externals/ivy-explorer 92abbe8 5/7: Don't read dispatch action twice, Clemens Radermacher, 2019/01/16