emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[nongnu] elpa/paredit 8a2d457 093/224: Reindent in `paredit-open-round'


From: ELPA Syncer
Subject: [nongnu] elpa/paredit 8a2d457 093/224: Reindent in `paredit-open-round' &c. like `paredit-wrap-round' &c.
Date: Sat, 7 Aug 2021 09:22:26 -0400 (EDT)

branch: elpa/paredit
commit 8a2d457d79edf5e19dd1f480335956b5b6d816c1
Author: Taylor R Campbell <campbell@mumble.net>
Commit: Taylor R Campbell <campbell@mumble.net>

    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(-)

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.)



reply via email to

[Prev in Thread] Current Thread [Next in Thread]