From efe4ca3d723584bdbed0d2c5bb10e4147057a20f Mon Sep 17 00:00:00 2001 From: Siddhartha Date: Wed, 18 Sep 2024 19:07:47 -0700 Subject: [PATCH] exit mode in meta levels prior to returning to ground Formerly I think with hydra we were implicitly exiting. With lithium, global modes like Buffer remain active even when the original buffer is killed, so we need to explicitly exit at the appropriate time. --- rigpa-mode-mode.el | 1 + rigpa-tower-mode.el | 1 + 2 files changed, 2 insertions(+) diff --git a/rigpa-mode-mode.el b/rigpa-mode-mode.el index ae6cb01..1a1b522 100644 --- a/rigpa-mode-mode.el +++ b/rigpa-mode-mode.el @@ -360,6 +360,7 @@ current editing tower." (let ((ref-buf (rigpa--get-ground-buffer))) (rigpa--revert-ui) (rigpa--remove-meta-side-effects) + (chimera--exit-mode (rigpa-current-mode)) (when (eq (with-current-buffer ref-buf (rigpa--get-ground-buffer)) ref-buf) diff --git a/rigpa-tower-mode.el b/rigpa-tower-mode.el index 1674f58..190262a 100644 --- a/rigpa-tower-mode.el +++ b/rigpa-tower-mode.el @@ -236,6 +236,7 @@ initial editing tower." (setq rigpa--last-tower-index rigpa--tower-index-on-entry)) (rigpa--revert-ui) (rigpa--remove-meta-tower-side-effects) + (chimera--exit-mode (rigpa-current-mode)) (kill-matching-buffers (concat "^" rigpa-buffer-prefix) nil t) (switch-to-buffer ref-buf)))