Mercurial > emacs
changeset 35709:023e7de7806f
(delete-trailing-whitespace): Don't delete formfeeds.
| author | Gerd Moellmann <gerd@gnu.org> |
|---|---|
| date | Mon, 29 Jan 2001 20:32:52 +0000 |
| parents | 60d4d3e49275 |
| children | 1bee5b46a604 |
| files | lisp/simple.el |
| diffstat | 1 files changed, 3 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/simple.el Mon Jan 29 20:23:47 2001 +0000 +++ b/lisp/simple.el Mon Jan 29 20:32:52 2001 +0000 @@ -237,6 +237,9 @@ (goto-char (point-min)) (while (re-search-forward "\\s-$" nil t) (skip-syntax-backward "-" (save-excursion (forward-line 0) (point))) + ;; Don't delete formfeeds, even if they are considered whitespace. + (if (looking-at ".*\f") + (goto-char (match-end 0))) (delete-region (point) (match-end 0)))))) (defun newline-and-indent ()