diff options
| author | Richard M. Stallman | 1993-11-23 11:20:27 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1993-11-23 11:20:27 +0000 |
| commit | 988e2aa66b5fac1864a0d58c95a3ffcc02ca6d37 (patch) | |
| tree | 04018472b11569c39b88c5d81471f01f2d95875e /lisp/progmodes | |
| parent | f4a7e5bd470df636724f8f5bda763c9435891dd5 (diff) | |
| download | emacs-988e2aa66b5fac1864a0d58c95a3ffcc02ca6d37.tar.gz emacs-988e2aa66b5fac1864a0d58c95a3ffcc02ca6d37.zip | |
(c-indent-region): As first thing, advance to a nonblank line.
Diffstat (limited to 'lisp/progmodes')
| -rw-r--r-- | lisp/progmodes/c-mode.el | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/lisp/progmodes/c-mode.el b/lisp/progmodes/c-mode.el index ddda62454f5..429d0bf2292 100644 --- 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." | |||
| 1191 | (defun c-indent-region (start end) | 1191 | (defun c-indent-region (start end) |
| 1192 | (save-excursion | 1192 | (save-excursion |
| 1193 | (goto-char start) | 1193 | (goto-char start) |
| 1194 | ;; Advance to first nonblank line. | ||
| 1195 | (skip-chars-forward " \t\n") | ||
| 1196 | (beginning-of-line) | ||
| 1194 | (let ((endmark (copy-marker end)) | 1197 | (let ((endmark (copy-marker end)) |
| 1195 | (c-tab-always-indent t)) | 1198 | (c-tab-always-indent t)) |
| 1196 | (while (and (bolp) (not (eolp))) | 1199 | (while (and (bolp) (not (eolp))) |