branch: externals/ergoemacs-mode
commit 2fcad4898b307811d9ac9a5893ffcb08447dce3a
Author: Matthew Fidler <[email protected]>
Commit: Matthew Fidler <[email protected]>
Allow toggling of ergoemacs-mode-term-raw-mode
---
ergoemacs-mode.el | 14 ++++++++++----
1 file changed, 10 insertions(+), 4 deletions(-)
diff --git a/ergoemacs-mode.el b/ergoemacs-mode.el
index da5b38a..56a6b08 100644
--- a/ergoemacs-mode.el
+++ b/ergoemacs-mode.el
@@ -182,11 +182,17 @@ The TEXT will be what the mode-line is set to be."
(defun ergoemacs-post-command-hook ()
"Run `ergoemacs-mode' post command hooks."
(when ergoemacs-mode
- (when (and (eq major-mode 'term-mode)
+ (if (and (eq major-mode 'term-mode)
(eq (current-local-map) term-raw-map))
- (setq-local ergoemacs-mode nil)
- (setq-local ergeoemacs-mode-term-raw-mode t))
- (run-hooks 'ergoemacs-post-command-hook)))
+ (setq-local ergoemacs-mode nil
+ ergeoemacs-mode-term-raw-mode t)
+ (run-hooks 'ergoemacs-post-command-hook)))
+ (when ergeoemacs-mode-term-raw-mode
+ (when (and (eq major-mode 'term-mode)
+ (not (eq (current-local-map) term-raw-map)))
+ (setq-local ergoemacs-mode t
+ ergeoemacs-mode-term-raw-mode nil)
+ (run-hooks 'ergoemacs-post-command-hook))))
(defvar ergoemacs-after-load-functions nil)
(defun ergoemacs-after-load-functions (absoulte-file-name)
