[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/ergoemacs-mode 8e17210 044/325: Remove ergoemacs-modal-
From: |
Stefan Monnier |
Subject: |
[elpa] externals/ergoemacs-mode 8e17210 044/325: Remove ergoemacs-modal-ignored-keymap |
Date: |
Sat, 23 Oct 2021 18:48:18 -0400 (EDT) |
branch: externals/ergoemacs-mode
commit 8e172100d22e92ad9a571f6e105a8e8e9484fc89
Author: Walter Landry <wlandry@caltech.edu>
Commit: Walter Landry <wlandry@caltech.edu>
Remove ergoemacs-modal-ignored-keymap
---
ergoemacs-command-loop.el | 1 -
ergoemacs-mode.el | 50 -----------------------------------------------
2 files changed, 51 deletions(-)
diff --git a/ergoemacs-command-loop.el b/ergoemacs-command-loop.el
index 925e282..7bcfda9 100644
--- a/ergoemacs-command-loop.el
+++ b/ergoemacs-command-loop.el
@@ -89,7 +89,6 @@
(defvar ergoemacs-default-cursor-color)
(defvar ergoemacs-echo-function)
(defvar ergoemacs-map--quit-map)
-(defvar ergoemacs-modal-ignored-keymap)
(defvar ergoemacs-mode-started-p)
(defvar guide-key/guide-key-sequence)
(defvar keyfreq-mode)
diff --git a/ergoemacs-mode.el b/ergoemacs-mode.el
index 39e9a5a..bc71de6 100644
--- a/ergoemacs-mode.el
+++ b/ergoemacs-mode.el
@@ -1016,56 +1016,6 @@ color. Otherwise this will be nil A color string as
passed to
(defvar ergoemacs-modal-list '())
(defvar ergoemacs-translate--translation-hash)
-(defvar ergoemacs-modal-ignored-keymap
- (let ((ret (make-sparse-keymap))
- (mods '(control meta shift hyper super alt))
- tmp
- key)
- (dolist (char '("<f1>"
- "<f2>"
- "<f3>"
- "<f4>"
- "<f5>"
- "<f6>"
- "<f7>"
- "<f8>"
- "<f9>"
- "<f10>"
- "<f11>"
- "<f12>"
- "<apps>" "<menu>"
- "RET" "ESC" "DEL" "TAB"
- "<home>"
- "<next>"
- "<prior>"
- "<end>"
- "<insert>"
- "<deletechar>"))
- (define-key ret (setq key (read-kbd-macro char t))
'ergoemacs-ignore-modal)
- (setq key (elt key 0))
- (dolist (mod1 mods)
- (setq tmp (vector (event-convert-list (list mod1 key))))
- (ignore-errors (define-key ret tmp 'ignore))
- (when (setq tmp (ergoemacs-translate--meta-to-escape tmp))
- (ignore-errors (define-key ret tmp 'ignore)))
- (dolist (mod2 mods)
- (setq tmp (vector (event-convert-list (list mod1 mod2 key))))
- (ignore-errors (define-key ret tmp 'ignore))
- (when (setq tmp (ergoemacs-translate--meta-to-escape tmp))
- (ignore-errors (define-key ret tmp 'ignore)))
- (dolist (mod3 mods)
- (setq tmp (vector (event-convert-list (list mod1 mod2 mod3 key))))
- (ignore-errors (define-key ret tmp 'ignore))
- (when (setq tmp (ergoemacs-translate--meta-to-escape tmp))
- (ignore-errors (define-key ret tmp 'ignore)))
- (dolist (mod4 mods)
- (setq tmp (vector (event-convert-list (list mod1 mod2 mod3 mod4
key))))
- (ignore-errors (define-key ret tmp 'ignore))
- (when (setq tmp (ergoemacs-translate--meta-to-escape tmp))
- (ignore-errors (define-key ret tmp 'ignore))))))))
- ret)
- "`ergoemacs-mode' keys to ignore the modal translation.
-Typically function keys")
(defcustom ergoemacs-translate-keys nil
"Try differnt key combinations to lookup unfound command.
- [elpa] externals/ergoemacs-mode updated (f9d6e3f -> 5692fc1), Stefan Monnier, 2021/10/23
- [elpa] externals/ergoemacs-mode 34c2099 016/325: Remove ergoemacs-autoload, Stefan Monnier, 2021/10/23
- [elpa] externals/ergoemacs-mode d30b431 003/325: Remove shift translation, instead directly binding those keys, Stefan Monnier, 2021/10/23
- [elpa] externals/ergoemacs-mode f2caedb 032/325: Remove dead code, Stefan Monnier, 2021/10/23
- [elpa] externals/ergoemacs-mode 149c900 037/325: Remove ergoemacs-command-loop--modal-pop, Stefan Monnier, 2021/10/23
- [elpa] externals/ergoemacs-mode 8e17210 044/325: Remove ergoemacs-modal-ignored-keymap,
Stefan Monnier <=
- [elpa] externals/ergoemacs-mode 3e25eac 043/325: Remove unused modal customizations, Stefan Monnier, 2021/10/23
- [elpa] externals/ergoemacs-mode 34daf02 062/325: Do not autoload ergoemacs-debug, Stefan Monnier, 2021/10/23
- [elpa] externals/ergoemacs-mode de74f45 002/325: Remove some Control key bindings, so nano works, Stefan Monnier, 2021/10/23
- [elpa] externals/ergoemacs-mode 72a812c 025/325: Remove dead code, Stefan Monnier, 2021/10/23
- [elpa] externals/ergoemacs-mode 30ed202 012/325: Remove cttl-x-c 'both' option, Stefan Monnier, 2021/10/23
- [elpa] externals/ergoemacs-mode b0c649d 052/325: Cleanup, Stefan Monnier, 2021/10/23
- [elpa] externals/ergoemacs-mode 1203d93 059/325: Remove dead code, Stefan Monnier, 2021/10/23
- [elpa] externals/ergoemacs-mode 4996d2c 066/325: Remove the apply-inits function, Stefan Monnier, 2021/10/23
- [elpa] externals/ergoemacs-mode 37d642e 092/325: Remove the optional off stuff and lots of helm stuff., Stefan Monnier, 2021/10/23
- [elpa] externals/ergoemacs-mode d6926f0 095/325: Simplify menus, Stefan Monnier, 2021/10/23