From 8a2d457d79edf5e19dd1f480335956b5b6d816c1 Mon Sep 17 00:00:00 2001 From: Taylor R Campbell Date: Tue, 22 Mar 2011 20:49:57 +0000 Subject: Reindent in `paredit-open-round' &c. like `paredit-wrap-round' &c. Ignore-this: 13da51d89ea973b30048035bea3ac499 This way, M-3 ( works mostly like M-3 M-(. (They still behave differently with respect to `paredit-yank-pop', though.) darcs-hash:20110322204957-00fcc-3cbe3616018abf120000169ad818b1d86de9bdcb --- paredit.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'paredit.el') diff --git a/paredit.el b/paredit.el index d86bf25..5c27bab 100644 --- a/paredit.el +++ b/paredit.el @@ -629,7 +629,8 @@ If in a character literal, do nothing. This prevents changing what was (paredit-in-comment-p)) (insert ,open)) ((not (paredit-in-char-p)) - (paredit-insert-pair n ,open ,close 'goto-char)))) + (paredit-insert-pair n ,open ,close 'goto-char) + (save-excursion (backward-up-list) (indent-sexp))))) (defun ,(paredit-conc-name "paredit-close-" name) () ,(concat "Move past one closing delimiter and reindent. \(Agnostic to the specific closing delimiter.) -- cgit v1.2.1