From 24886813f4f38a858cf31be5c9c1f434d722ed29 Mon Sep 17 00:00:00 2001 From: Gerd Moellmann Date: Mon, 5 Feb 2001 10:16:47 +0000 Subject: [PATCH] (next-line): Goto end-of-line before inserting a newline. --- lisp/ChangeLog | 4 ++++ lisp/simple.el | 3 ++- 2 files changed, 6 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index fb98d98b7e6..9af4910ea9a 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,7 @@ +2001-02-05 Gerd Moellmann + + * simple.el (next-line): Goto end-of-line before inserting a newline. + 2001-02-05 Miles Bader * image-file.el (insert-image-file): When visiting an image, also diff --git a/lisp/simple.el b/lisp/simple.el index 9078e6aa21e..d04a3b0091e 100644 --- a/lisp/simple.el +++ b/lisp/simple.el @@ -2408,7 +2408,8 @@ and more reliable (no dependence on goal column, etc.)." (if (save-excursion (end-of-line) (eobp)) ;; When adding a newline, don't expand an abbrev. (let ((abbrev-mode nil)) - (newline 1)) + (end-of-line) + (insert "\n")) (line-move arg)) (if (interactive-p) (condition-case nil -- 2.39.5