From: Artur Malabarba <bruce.connor.am@gmail.com>
Date: Sat, 24 Oct 2015 21:24:09 +0000 (+0100)
Subject: * lisp/simple.el (open-line): Fix docstring
X-Git-Tag: emacs-25.0.90~1011
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=6939896e2ffe2e742954c14bba6129af456f0857;p=emacs.git

* lisp/simple.el (open-line): Fix docstring

Also explain apparently redundant line.
---

diff --git a/lisp/simple.el b/lisp/simple.el
index 8acb6839744..5b0503778bd 100644
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -460,10 +460,9 @@ A non-nil INTERACTIVE argument means to run the `post-self-insert-hook'."
 
 (defun open-line (n)
   "Insert a newline and leave point before it.
-If there is a fill prefix and/or a `left-margin', insert them
-on the new line if the line would have been blank.
-With arg N, insert N newlines."
-  (interactive "*p")
+If there is a fill prefix and/or a `left-margin', insert them on
+the new line.  If the old line would have been blank, insert them
+on the old line as well.
   (let* ((do-fill-prefix (and fill-prefix (bolp)))
 	 (do-left-margin (and (bolp) (> (current-left-margin) 0)))
 	 (loc (point-marker))
@@ -478,6 +477,7 @@ With arg N, insert N newlines."
       (forward-line 1)
       (setq n (1- n)))
     (goto-char loc)
+    ;; Necessary in case a margin or prefix was inserted.
     (end-of-line)))
 
 (defun split-line (&optional arg)