Diyelim ki bir elisp kodu var:

(+ 2 3▮(+ 3
          4))

Sembol eklediğimde veya kaldırdığımda, sexp'i imleçten sonra otomatik olarak yeniden girintili hale getirmenin bir yolu var mı?

Yani bastıktan sonra SPC 4 SPCotomatik olarak alacağım:

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

Bu kılavuzu arayarak mark-sexptakip edebilirim indent-region. Bunu yapmanın daha iyi yolları var mı?

mark-sexp+ Yerine indent-region, tuşuna basabilirsiniz C-M-q. Bu arayacak indent-pp-sexp. Otomatik değil, iki komutu çağırmaktan biraz daha iyi.

Veya kullanıyorsanız paredit-modetuşuna basın M-q. Bu, içinde bulunduğunuz tüm fonksiyon tanımını hatırlatacaktır.

Agresif Girinti Modu

Bazı insanlar bunu istediğinden, bu cevabı bir pakete dönüştürdüm .

Melpa'yı yapılandırdıysanız,

M-x package-install RET aggressive-indent

Tüm seçenekler için Benioku dosyasına bakın , ancak açmanın en basit yolu:

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

Eski Cevap

Aşağıdakiler yalnızca elisp arabelleklerinde otomatik girinti yapar. Bir şeyleri sildiğinizde veya sorduğunuzda da (yalnızca yazmak yerine) çalışmanın avantajı vardır. Diğer modlara da eklemek kolaydır.

Bu işlev, noktanın içinde bulunduğu s ifadesini girintili kılacaktır. İsterseniz bir anahtara bağlayabilirsiniz, ancak önce aşağıya bakın.

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

Bu kanca, herhangi bir şey yazdıktan sonra, ancak elisp arabelleklerinde bu işlevin çalışmasını sağlayacak şekilde yapar. Bu, her şeyi her zaman girintili tutmalıdır.

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

Dene! Oldukça iyi çalışıyor.

Ayrıca, @ holocronweaver'ın yorumlardaki önerisini izleyerek, c benzeri diller için aşağıdakine benzer bir şey kullanabilirsiniz:

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

Önceden var olan bir çözümü bilmiyorum, ancak bunu post-self-insert-hookkendiniz gerçekleştirmek için kullanabilirsiniz :

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

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

Yine de potansiyel performans sorunları hakkında endişelenirim.

Deneyebilirsin el-fly-girinti-mode fazla uslu edilir aggressive-indent-modeelisp ile uğraşırken.