Có một lệnh để dọn dẹp dấu ngoặc đơn?

Khi chỉnh sửa mã lisp, tôi thường kết thúc bằng dấu ngoặc đơn nằm rải rác xung quanh (giả sử |là điểm):

(defun example-function ()
  (let ((x (+ 1 1)))
    (when x
      (message x)|
      )
    ))

Có bất kỳ lệnh thuận tiện để sửa lỗi này? Hoặc trong Emacs lõi, paredit / smartparens, hoặc các gói khác?

Tôi biết tôi có thể nhấn )và paredit-close-roundsẽ sửa dấu ngoặc đơn tiếp theo, nhưng tôi muốn sửa tất cả chúng trong một lệnh.

i( lispy-tab) từ lispy làm điều đó. Dưới đây là một ảnh chụp màn hình trực quan kiểm tra ERT (bằng cách sử dụng xv( lispy-view-test)).