(defun indent-and-align (beginning end)
  (interactive "r")
  (save-excursion
	(indent-region beginning end nil)
	(align beginning end)
	))