[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/objed be4c3cd 114/166: Make indenting defuns repeatable
From: |
Clemens Radermacher |
Subject: |
[elpa] externals/objed be4c3cd 114/166: Make indenting defuns repeatable, too |
Date: |
Sun, 29 Dec 2019 08:21:11 -0500 (EST) |
branch: externals/objed
commit be4c3cd3d46f7c5226f4ce4d1ee8b7831f572a6c
Author: Clemens Radermacher <address@hidden>
Commit: Clemens Radermacher <address@hidden>
Make indenting defuns repeatable, too
---
objed.el | 27 ++++++++++++++-------------
1 file changed, 14 insertions(+), 13 deletions(-)
diff --git a/objed.el b/objed.el
index b839b53..c2e8e63 100644
--- a/objed.el
+++ b/objed.el
@@ -599,19 +599,20 @@ selected one."
(key-binding "q" nil t))))
(if (and (string-match "insert" (symbol-name nc))
(not buffer-read-only))
- (cond ((or (eq major-mode 'fundamental-mode)
- (derived-mode-p 'text-mode)
- (objed--at-comment-p)
- (objed--in-string-or-comment-p))
- (when (eq last-command this-command)
- (objed-next))
- (call-interactively 'fill-paragraph)
- (objed--switch-to 'textblock)
- (message "Filled paragraph."))
- ((objed--switch-to 'defun)
- (indent-region (objed--beg) (objed--end))
- (objed--update-current-object)
- (message "Indented defun.")))
+ (progn
+ (when (eq last-command this-command)
+ (objed-next))
+ (cond ((or (eq major-mode 'fundamental-mode)
+ (derived-mode-p 'text-mode)
+ (objed--at-comment-p)
+ (objed--in-string-or-comment-p))
+ (call-interactively 'fill-paragraph)
+ (objed--switch-to 'textblock)
+ (message "Filled paragraph."))
+ ((objed--switch-to 'defun)
+ (indent-region (objed--beg) (objed--end))
+ (objed--update-current-object)
+ (message "Indented defun."))))
(objed--reset)
(call-interactively nc))))
- [elpa] externals/objed 50f79c8 091/166: Include textblock for block expansion when at comment, too, (continued)
- [elpa] externals/objed 50f79c8 091/166: Include textblock for block expansion when at comment, too, Clemens Radermacher, 2019/12/29
- [elpa] externals/objed dcea2bc 124/166: Add window resize commands, Clemens Radermacher, 2019/12/29
- [elpa] externals/objed fc93d49 134/166: Improve error object when flymake is used, Clemens Radermacher, 2019/12/29
- [elpa] externals/objed d111035 140/166: Require mc if necessary, Clemens Radermacher, 2019/12/29
- [elpa] externals/objed 6a2663e 138/166: Don't bind C-o by default, Clemens Radermacher, 2019/12/29
- [elpa] externals/objed dc23da4 153/166: Add objed-exit-hook #57, Clemens Radermacher, 2019/12/29
- [elpa] externals/objed faa9fb0 158/166: Allow defining objects without ending regexp (#58), Clemens Radermacher, 2019/12/29
- [elpa] externals/objed 2a25ff2 081/166: Make toggle smarter for sexp objects, Clemens Radermacher, 2019/12/29
- [elpa] externals/objed 2f50485 102/166: Add css defun object, Clemens Radermacher, 2019/12/29
- [elpa] externals/objed d3ab36c 108/166: Add kill-this-buffer to command alist, Clemens Radermacher, 2019/12/29
- [elpa] externals/objed be4c3cd 114/166: Make indenting defuns repeatable, too,
Clemens Radermacher <=
- [elpa] externals/objed 4a22002 120/166: Improve reformat command, Clemens Radermacher, 2019/12/29
- [elpa] externals/objed 9267f38 125/166: Improve open line command, Clemens Radermacher, 2019/12/29
- [elpa] externals/objed cab7cee 130/166: Update hl init, Clemens Radermacher, 2019/12/29
- [elpa] externals/objed 7374a35 128/166: Improve sexp fallback, Clemens Radermacher, 2019/12/29
- [elpa] externals/objed 42a553e 139/166: Don't override M-o binding, Clemens Radermacher, 2019/12/29
- [elpa] externals/objed 4d1a445 141/166: Add public object bounds functions, Clemens Radermacher, 2019/12/29
- [elpa] externals/objed b6b7c3f 144/166: Disable during a company completion, Clemens Radermacher, 2019/12/29
- [elpa] externals/objed 70cf23e 145/166: Merge pull request #51 from flatwhatson/fix-company, Clemens Radermacher, 2019/12/29
- [elpa] externals/objed 2a06126 143/166: Add functions to map over objects, Clemens Radermacher, 2019/12/29
- [elpa] externals/objed fea1148 148/166: Fixes #54, identifier movement for symbols with regex chars, Clemens Radermacher, 2019/12/29