[elpa] externals/objed 9267f38 125/166: Improve open line command

[Clemens Radermacher]

branch: externals/objed
commit 9267f38c5487a4cd10e73daa6f6a3990efb5ac0d
Author: Clemens Radermacher <address@hidden>
Commit: Clemens Radermacher <address@hidden>

    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)