>>107639159
(defun align-let-value-forms ()
"When point is at the beginning or at the end of a `let' bindings
form, indent all the value-forms so they're all aligned with the
value-form on the highest column."
(interactive)
(unless (and (listp (sexp-at-point))
(seq-some 'listp (sexp-at-point)))
(user-error "Not a valid sexp for `align-let-value-forms'."))
(save-excursion
(let ((begin (if (char-equal ?\( (char-after))
(point)
(backward-list)
(point)))
(end (progn (forward-list) (point)))
Comment too long. Click here to view the full text.