(open-line): Move fill-prefix insert inside save-excursion.

This commit is contained in:
Richard M. Stallman 1993-12-31 05:52:54 +00:00
parent 8e3e25645a
commit 385f7c8e56

View file

@ -46,8 +46,8 @@ With arg N, insert N newlines."
(forward-char -1)))
(while (> arg 0)
(save-excursion
(insert ?\n))
(if do-fill-prefix (insert fill-prefix))
(insert ?\n)
(if do-fill-prefix (insert fill-prefix)))
(setq arg (1- arg)))
(if flag (forward-char 1))))