(c-indent-region): As first thing, advance to a nonblank line.

[gnu-emacs] / lisp / progmodes / c-mode.el

diff --git a/lisp/progmodes/c-mode.el b/lisp/progmodes/c-mode.el
index ddda62454f5499b3474464ba3550832fe326dd51..429d0bf2292959e1632936a8dd8873a82c63bcf2 100644 (file)
--- a/lisp/progmodes/c-mode.el
+++ b/lisp/progmodes/c-mode.el
@@ -1191,6 +1191,9 @@ If within a string or comment, move by sentences instead of statements."
 (defun c-indent-region (start end)
   (save-excursion
     (goto-char start)
+    ;; Advance to first nonblank line.
+    (skip-chars-forward " \t\n")
+    (beginning-of-line)
     (let ((endmark (copy-marker end))
          (c-tab-always-indent t))
       (while (and (bolp) (not (eolp)))