branch: externals/objed commit 9267f38c5487a4cd10e73daa6f6a3990efb5ac0d Author: Clemens Radermacher <clem...@posteo.net> Commit: Clemens Radermacher <clem...@posteo.net>
Improve open line command --- objed.el | 13 ++++--------- 1 file changed, 4 insertions(+), 9 deletions(-) diff --git a/objed.el b/objed.el index 3d4f00b..a32becb 100644 --- a/objed.el +++ b/objed.el @@ -2856,18 +2856,13 @@ Moves point over any whitespace afterwards." (defun objed-open-line () "Open line." (interactive) - (back-to-indentation) - (if electric-indent-inhibit - (let ((indent (buffer-substring (line-beginning-position) - (point)))) - (save-excursion - (insert "\n") - (insert indent))) + (let ((indent (current-column))) (save-excursion - (newline) - (indent-according-to-mode))) + (insert "\n") + (insert (make-string indent ?\s)))) (objed--reset)) + (defun objed-move-window-line-up () "Move window line up." (interactive)