[Emacs-diffs] master 3c941b9 1/2: comint-get-old-input-default: behavior follows docstring

[Dima Kogan]

branch: master
commit 3c941b900007c9e79c00af0f21d88154f6d8af1a
Author: Dima Kogan <address@hidden>
Commit: Dima Kogan <address@hidden>

    comint-get-old-input-default: behavior follows docstring
    
    lisp/comint.el (comint-get-old-input-default): Modify behavior to follow
    docstring: if `comint-use-prompt-regexp' is nil, then return the CURRENT 
LINE,
    if point is on an output field.
---
 lisp/comint.el |    5 +----
 1 file changed, 1 insertion(+), 4 deletions(-)

diff --git a/lisp/comint.el b/lisp/comint.el
index 830f4ca..b23f72e 100644
--- a/lisp/comint.el
+++ b/lisp/comint.el
@@ -2239,10 +2239,7 @@ the current line with any initial string matching the 
regexp
              (null (get-char-property (setq bof (field-beginning)) 'field)))
        (field-string-no-properties bof)
       (comint-bol)
-      (buffer-substring-no-properties (point)
-                                     (if comint-use-prompt-regexp
-                                         (line-end-position)
-                                       (field-end))))))
+      (buffer-substring-no-properties (point) (line-end-position)))))
 
 (defun comint-copy-old-input ()
   "Insert after prompt old input at point as new input to be edited.