[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/ergoemacs-mode c53e573 056/325: Cleanup
From: |
Stefan Monnier |
Subject: |
[elpa] externals/ergoemacs-mode c53e573 056/325: Cleanup |
Date: |
Sat, 23 Oct 2021 18:48:20 -0400 (EDT) |
branch: externals/ergoemacs-mode
commit c53e573c45afe8b8a639d6ded2eb2f886aefff7e
Author: Walter Landry <wlandry@caltech.edu>
Commit: Walter Landry <wlandry@caltech.edu>
Cleanup
---
ergoemacs-theme-engine.el | 23 ++++++++++++-----------
1 file changed, 12 insertions(+), 11 deletions(-)
diff --git a/ergoemacs-theme-engine.el b/ergoemacs-theme-engine.el
index 9aa329c..8269411 100644
--- a/ergoemacs-theme-engine.el
+++ b/ergoemacs-theme-engine.el
@@ -645,17 +645,18 @@ See also `find-function-recenter-line' and
`find-function-after-hook'."
(dolist (cmds ergoemacs-theme-create-bash-functions)
(dolist (cmd cmds)
(dolist (key-cmd (where-is-internal cmd nil))
- (setq key-string (key-description key-cmd))
- ;; Only set up the Meta bindings, not the regular arrow or
- ;; Control bindings. That would require more complicated
- ;; logic to get right.
- (if (string-prefix-p "M-" key-string)
- (setq ret (concat ret "\n\"\\"
- (replace-regexp-in-string "M-" "e"
key-string t)
- "\": "
- (symbol-name (nth 0 cmds))
- )
- )
+ (let ((key-string (key-description key-cmd)))
+ ;; Only set up the Meta bindings, not the regular arrow or
+ ;; Control bindings. That would require more complicated
+ ;; logic to get right.
+ (if (string-prefix-p "M-" key-string)
+ (setq ret (concat ret "\n\"\\"
+ (replace-regexp-in-string "M-" "e"
key-string t)
+ "\": "
+ (symbol-name (nth 0 cmds))
+ )
+ )
+ )
)
)
)
- [elpa] externals/ergoemacs-mode 45a2ec3 034/325: Remove unused 'require, (continued)
- [elpa] externals/ergoemacs-mode 45a2ec3 034/325: Remove unused 'require, Stefan Monnier, 2021/10/23
- [elpa] externals/ergoemacs-mode 3c793e3 035/325: Cleanup, Stefan Monnier, 2021/10/23
- [elpa] externals/ergoemacs-mode 46f027f 042/325: More modal removal, Stefan Monnier, 2021/10/23
- [elpa] externals/ergoemacs-mode d297724 045/325: Remove ergoemacs-command-loop--modal and ergoemacs-command-loop--modal-show, Stefan Monnier, 2021/10/23
- [elpa] externals/ergoemacs-mode 71e949b 063/325: Remove dead code, Stefan Monnier, 2021/10/23
- [elpa] externals/ergoemacs-mode 3729fbd 055/325: Cleanup, Stefan Monnier, 2021/10/23
- [elpa] externals/ergoemacs-mode 49360a1 017/325: Remove ergoemacs-redo since it only exists to download undo-tree, Stefan Monnier, 2021/10/23
- [elpa] externals/ergoemacs-mode e9ec38d 011/325: Remove dead code, Stefan Monnier, 2021/10/23
- [elpa] externals/ergoemacs-mode b20b8ae 033/325: Remove :mode and unused macro properties, Stefan Monnier, 2021/10/23
- [elpa] externals/ergoemacs-mode 5fbcf0c 048/325: Remove unchorded stuff and related tests, Stefan Monnier, 2021/10/23
- [elpa] externals/ergoemacs-mode c53e573 056/325: Cleanup,
Stefan Monnier <=
- [elpa] externals/ergoemacs-mode 5b285ea 057/325: Run everything immediately, Stefan Monnier, 2021/10/23
- [elpa] externals/ergoemacs-mode b16e51c 068/325: Remove unused diminish functions, Stefan Monnier, 2021/10/23
- [elpa] externals/ergoemacs-mode e7a914b 094/325: Remove ctl-to-alt, Stefan Monnier, 2021/10/23
- [elpa] externals/ergoemacs-mode 4e5dfc6 089/325: Turn off caching in ergoemacs-map--composed-list, Stefan Monnier, 2021/10/23
- [elpa] externals/ergoemacs-mode 5122817 097/325: cleanup, Stefan Monnier, 2021/10/23
- [elpa] externals/ergoemacs-mode 138245e 096/325: Remove unused separators, Stefan Monnier, 2021/10/23
- [elpa] externals/ergoemacs-mode e3d4071 108/325: Remove standard-var component, Stefan Monnier, 2021/10/23
- [elpa] externals/ergoemacs-mode 8764713 113/325: Fix more warnings, Stefan Monnier, 2021/10/23
- [elpa] externals/ergoemacs-mode cc8c354 106/325: Simplify ergoemacs-mode and remove ergoemacs-mode--update-theme-description, Stefan Monnier, 2021/10/23
- [elpa] externals/ergoemacs-mode 9ded0d2 126/325: Move more keys into plain functions, Stefan Monnier, 2021/10/23