(open-line): Move fill-prefix insert inside save-excursion.
This commit is contained in:
parent
8e3e25645a
commit
385f7c8e56
1 changed files with 2 additions and 2 deletions
|
@ -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))))
|
||||
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue