branch: externals/objed
commit 5aa473d7c276f1ed5956e51b7f7df4e35d0ec895
Author: Clemens Radermacher <clem...@posteo.net>
Commit: Clemens Radermacher <clem...@posteo.net>

    Reset before quit window when objed is active
---
 objed.el | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/objed.el b/objed.el
index 35325c7..72a5d36 100644
--- a/objed.el
+++ b/objed.el
@@ -590,8 +590,8 @@ BEFORE and AFTER are forms to execute before/after calling 
the command."
 if KILL is non-nil kill the buffer. WINDOW defaults to the
 selected one."
   (interactive)
-  (let* ((overriding-terminal-local-map nil)
-         (nc (key-binding "q" nil t)))
+  (let ((nc (let ((overriding-terminal-local-map nil))
+              (key-binding "q" nil t))))
     (if (and (string-match "insert" (symbol-name nc))
              (not buffer-read-only))
         (cond ((and (not (eq last-command this-command))
@@ -606,6 +606,7 @@ selected one."
                (indent-region (objed--beg) (objed--end))
                (objed--update-current-object)
                (message "Indented defun.")))
+      (objed--reset)
       (call-interactively nc))))
 
 (defun objed--point-in-periphery ()

Reply via email to