Commit 24886813 authored by Gerd Moellmann's avatar Gerd Moellmann
Browse files

(next-line): Goto end-of-line before inserting a newline.

parent 65e70fc4
2001-02-05 Gerd Moellmann <gerd@gnu.org>
* simple.el (next-line): Goto end-of-line before inserting a newline.
2001-02-05 Miles Bader <miles@gnu.org> 2001-02-05 Miles Bader <miles@gnu.org>
   
* image-file.el (insert-image-file): When visiting an image, also * image-file.el (insert-image-file): When visiting an image, also
......
...@@ -2408,7 +2408,8 @@ and more reliable (no dependence on goal column, etc.)." ...@@ -2408,7 +2408,8 @@ and more reliable (no dependence on goal column, etc.)."
(if (save-excursion (end-of-line) (eobp)) (if (save-excursion (end-of-line) (eobp))
;; When adding a newline, don't expand an abbrev. ;; When adding a newline, don't expand an abbrev.
(let ((abbrev-mode nil)) (let ((abbrev-mode nil))
(newline 1)) (end-of-line)
(insert "\n"))
(line-move arg)) (line-move arg))
(if (interactive-p) (if (interactive-p)
(condition-case nil (condition-case nil
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment