diff options
| author | Richard M. Stallman | 1993-12-31 05:52:54 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1993-12-31 05:52:54 +0000 |
| commit | 385f7c8e56b9dc9788b912a38da5e9b899be58d4 (patch) | |
| tree | de89abad79fe2d2d54ef238e18ba483769aad5d7 | |
| parent | 8e3e25645ab6e896646c29013703622957f82d14 (diff) | |
| download | emacs-385f7c8e56b9dc9788b912a38da5e9b899be58d4.tar.gz emacs-385f7c8e56b9dc9788b912a38da5e9b899be58d4.zip | |
(open-line): Move fill-prefix insert inside save-excursion.
| -rw-r--r-- | lisp/simple.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/simple.el b/lisp/simple.el index fe17f25a9de..2a471f61f9e 100644 --- a/lisp/simple.el +++ b/lisp/simple.el | |||
| @@ -46,8 +46,8 @@ With arg N, insert N newlines." | |||
| 46 | (forward-char -1))) | 46 | (forward-char -1))) |
| 47 | (while (> arg 0) | 47 | (while (> arg 0) |
| 48 | (save-excursion | 48 | (save-excursion |
| 49 | (insert ?\n)) | 49 | (insert ?\n) |
| 50 | (if do-fill-prefix (insert fill-prefix)) | 50 | (if do-fill-prefix (insert fill-prefix))) |
| 51 | (setq arg (1- arg))) | 51 | (setq arg (1- arg))) |
| 52 | (if flag (forward-char 1)))) | 52 | (if flag (forward-char 1)))) |
| 53 | 53 | ||