[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/objed 5aa473d 078/166: Reset before quit window when ob
From: |
Clemens Radermacher |
Subject: |
[elpa] externals/objed 5aa473d 078/166: Reset before quit window when objed is active |
Date: |
Sun, 29 Dec 2019 08:21:04 -0500 (EST) |
branch: externals/objed
commit 5aa473d7c276f1ed5956e51b7f7df4e35d0ec895
Author: Clemens Radermacher <address@hidden>
Commit: Clemens Radermacher <address@hidden>
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 ()
- [elpa] externals/objed 0d506fa 074/166: Allow specifying a fallback object for init, (continued)
- [elpa] externals/objed 0d506fa 074/166: Allow specifying a fallback object for init, Clemens Radermacher, 2019/12/29
- [elpa] externals/objed 9fbd47f 084/166: Fix org field object, Clemens Radermacher, 2019/12/29
- [elpa] externals/objed 8861388 082/166: Auto switch from sexp object only for interactive state toggle, Clemens Radermacher, 2019/12/29
- [elpa] externals/objed 1cad7c2 086/166: Start with line object if not current for block expansion, Clemens Radermacher, 2019/12/29
- [elpa] externals/objed 13e7829 093/166: Fix word object navigation with objed-next/prev for inner subwords, Clemens Radermacher, 2019/12/29
- [elpa] externals/objed 213f672 094/166: Use prefixed word of symbol for inner ident object, Clemens Radermacher, 2019/12/29
- [elpa] externals/objed c02f3c1 071/166: Add description for uppercase kill/delete, Clemens Radermacher, 2019/12/29
- [elpa] externals/objed f01a171 072/166: Make objed-init suitable for advices, Clemens Radermacher, 2019/12/29
- [elpa] externals/objed db8850a 064/166: Improve regex object, Clemens Radermacher, 2019/12/29
- [elpa] externals/objed 870d125 068/166: Update docstrings for regex objects, Clemens Radermacher, 2019/12/29
- [elpa] externals/objed 5aa473d 078/166: Reset before quit window when objed is active,
Clemens Radermacher <=
- [elpa] externals/objed 354d5fa 079/166: Don't bind scrolling commands, use char object for scrolling, Clemens Radermacher, 2019/12/29
- [elpa] externals/objed 35feabb 085/166: Add function to get align section bounds, Clemens Radermacher, 2019/12/29
- [elpa] externals/objed 36ff680 087/166: Adjust bindings and add additional custom user map binding, Clemens Radermacher, 2019/12/29
- [elpa] externals/objed 1dc62ca 089/166: Improve block expansion, Clemens Radermacher, 2019/12/29
- [elpa] externals/objed c07df28 088/166: Rewrite align section getter function, Clemens Radermacher, 2019/12/29
- [elpa] externals/objed 107096a 092/166: Improve block expansion order in comments, Clemens Radermacher, 2019/12/29
- [elpa] externals/objed 2f3734b 095/166: Use inner word as symbol prefix, Clemens Radermacher, 2019/12/29
- [elpa] externals/objed 98a94d3 098/166: Change description for block and context objects, Clemens Radermacher, 2019/12/29
- [elpa] externals/objed 1b5b4df 096/166: Add optional subword object, Clemens Radermacher, 2019/12/29
- [elpa] externals/objed e0dde43 097/166: Improve block expansion, avoiding text block/comment duplicates, Clemens Radermacher, 2019/12/29