Angenommen, ich habe einen Elisp-Code wie:

(+ 2 3▮(+ 3
          4))

Gibt es eine Möglichkeit, das Geschlecht nach dem Cursor automatisch neu einzurücken, wenn ich Symbole hinzufüge oder entferne?

Nach dem Drücken von SPC 4 SPCwürde ich also automatisch Folgendes erhalten:

(+ 2 3 4 ▮(+ 3
             4))

Ich kann dieses Handbuch ausführen, mark-sexpindem ich gefolgt von anrufe indent-region. Gibt es dafür bessere Möglichkeiten?

Anstelle von mark-sexp+ indent-regionkönnen Sie auch drücken C-M-q. Dies wird anrufen indent-pp-sexp. Nicht automatisch, aber ein bisschen besser, als zwei Befehle aufrufen zu müssen.

Oder paredit-modedrücken Sie, wenn Sie verwenden M-q. Dadurch wird die gesamte Funktionsdefinition, in der Sie sich befinden, erneut berücksichtigt.

Modus für aggressive Einrückung

Da einige Leute danach fragten, habe ich diese Antwort in ein Paket umgewandelt .

Wenn Sie Melpa konfiguriert haben, können Sie es mit installieren

M-x package-install RET aggressive-indent

In der Readme-Datei finden Sie alle Optionen. Die einfachste Methode zum Aktivieren ist jedoch:

(add-hook 'emacs-lisp-mode-hook #'aggressive-indent-mode)

Die alte Antwort

Im Folgenden wird die automatische Einrückung nur für Elisp-Puffer ausgeführt. Es hat den Vorteil, dass es auch funktioniert, wenn Sie etwas löschen oder ruckeln (anstatt nur zu tippen). Es ist auch einfach, andere Modi hinzuzufügen.

Diese Funktion rückt jeden S-Ausdruck ein, in dem sich der Punkt gerade befindet. Sie können es an einen Schlüssel binden, wenn Sie möchten, aber sehen Sie zuerst weiter unten.

(require 'cl-lib)

(defun endless/indent-defun ()
  "Indent current defun.
Do nothing if mark is active (to avoid deactivating it), or if
buffer is not modified (to avoid creating accidental
modifications)."
  (interactive)
  (ignore-errors
    (unless (or (region-active-p)
                buffer-read-only
                (null (buffer-modified-p)))
      (let ((l (save-excursion (beginning-of-defun 1) (point)))
            (r (save-excursion (end-of-defun 1) (point))))
        (cl-letf (((symbol-function 'message) #'ignore))
          (indent-region l r))))))

Dieser Haken bewirkt, dass diese Funktion ausgeführt wird, nachdem Sie etwas eingegeben haben, jedoch nur in Elisp-Puffern. Dies sollte alles immer eingerückt halten.

(add-hook
 'emacs-lisp-mode-hook
 (lambda ()
   (add-hook 'post-command-hook
             #'endless/indent-defun nil 'local)))

Versuch es! Es funktioniert bemerkenswert gut.

Wenn Sie dem Vorschlag von @ holocronweaver in den Kommentaren folgen, können Sie für c-ähnliche Sprachen Folgendes verwenden:

(define-key c++-mode-map ";"
  (lambda () (interactive)
    (insert ";")
    (endless/indent-defun)))

Ich kenne keine bereits vorhandene Lösung, aber Sie können diese verwenden post-self-insert-hook, um dies selbst zu erreichen:

(defun my-indent-next-sexp ()
  (interactive)
  (mark-sexp)
  (indent-region))

(add-hook 'post-self-insert-hook 'my-indent-next-sexp)

Ich würde mir allerdings Sorgen um mögliche Leistungsprobleme machen.

Sie können den el-fly-indent-Modus ausprobieren , der sich besser aggressive-indent-modeverhält als bei Elisp.