indent-buffer

[Emanuel Berg]

(defun indent-buffer ()
  (interactive)
  (indent-region (point-min) (point-max)) )

If one did it from scratch, perhaps one would have BEG and END
formal parameters for `indent-region' that were optional and
defaulting to (point-min) and (point-max), however as it
stands `indent-region' already has an optional COLUMN.

(Yeah, should be BEG, END, and COL, not START, END,
and COLUMN.)

There is also `pp--indent-buffer' that looks like this:

(defun pp--indent-buffer ()
  (goto-char (point-min))
  (while (not (eobp))
    (lisp-indent-line)
    (forward-line 1)))

(forward-line 1) is the same as (forward-line) BTW ... don't
know when that changed, I myself has 8 occurences of
(forward-line 1) ...

-- 
underground experts united
https://dataswamp.org/~incal