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

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

[nongnu] elpa/evil-escape e0a0c9a9ee 023/133: Add support for paradox an


From: ELPA Syncer
Subject: [nongnu] elpa/evil-escape e0a0c9a9ee 023/133: Add support for paradox and gist-list menu
Date: Wed, 3 Jan 2024 21:59:49 -0500 (EST)

branch: elpa/evil-escape
commit e0a0c9a9eeabda4b61c377d5de7ecf1569866943
Author: syl20bnr <sylvain.benner@gmail.com>
Commit: syl20bnr <sylvain.benner@gmail.com>

    Add support for paradox and gist-list menu
---
 README.md      | 2 ++
 evil-escape.el | 8 +++++++-
 2 files changed, 9 insertions(+), 1 deletion(-)

diff --git a/README.md b/README.md
index 970a7bbac3..7145474145 100644
--- a/README.md
+++ b/README.md
@@ -17,6 +17,8 @@ Press `fd` quickly to:
 - quit apropos buffers
 - quit ert buffers
 - quit undo-tree buffer
+- quit paradox
+- quit gist-list menu
 - hide neotree buffer
 
 And more to come !
diff --git a/evil-escape.el b/evil-escape.el
index 1cd5567972..8ba0294705 100644
--- a/evil-escape.el
+++ b/evil-escape.el
@@ -5,7 +5,7 @@
 ;; Author: Sylvain Benner <sylvain.benner@gmail.com>
 ;; Keywords: convenience editing evil
 ;; Created: 22 Oct 2014
-;; Version: 1.6.1
+;; Version: 1.6.2
 ;; Package-Requires: ((emacs "24") (evil "1.0.9") (key-chord "0.6"))
 ;; URL: https://github.com/syl20bnr/evil-escape
 
@@ -39,6 +39,8 @@
 ;;   - quit apropos buffers
 ;;   - quit ert buffers
 ;;   - quit undo-tree buffer
+;;   - quit paradox
+;;   - quit gist-list menu
 ;;   - hide neotree buffer
 ;; And more to come !
 
@@ -157,6 +159,10 @@ with a key sequence."
                     '(lambda () (interactive)
                        (cond ((string-match "magit" (symbol-name major-mode))
                               (setq unread-command-events 
(listify-key-sequence "q")))
+                             ((eq 'paradox-menu-mode major-mode)
+                              (paradox-quit-and-close))
+                             ((eq 'gist-list-menu-mode major-mode)
+                              (quit-window))
                              (t  evil-normal-state))))
   ;; visual state
   (key-chord-define evil-visual-state-map evil-escape-key-sequence 
'evil-exit-visual-state)



reply via email to

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