summaryrefslogtreecommitdiff
path: root/lisp/comint.el
diff options
context:
space:
mode:
authorGerd Moellmann <gerd@gnu.org>2001-01-24 16:21:56 +0000
committerGerd Moellmann <gerd@gnu.org>2001-01-24 16:21:56 +0000
commit7e4f9cf463118b23a52d1e006f40a692b287c0e1 (patch)
tree7e4add448c64210a1659be89e1105875f5de3624 /lisp/comint.el
parent1e54671434073cafe9a6d350234ebbb5171ddef7 (diff)
downloademacs-7e4f9cf463118b23a52d1e006f40a692b287c0e1.tar.gz
(comint-replace-by-expanded-history-before-point): Fix
change of 2000-08-03 to move point to the start of the line again.
Diffstat (limited to 'lisp/comint.el')
-rw-r--r--lisp/comint.el1
1 files changed, 1 insertions, 0 deletions
diff --git a/lisp/comint.el b/lisp/comint.el
index 72e536c0d08..921b567276f 100644
--- a/lisp/comint.el
+++ b/lisp/comint.el
@@ -1136,6 +1136,7 @@ than the logical beginning of line."
(save-excursion
(let ((toend (- (line-end-position) (point)))
(start (comint-line-beginning-position)))
+ (goto-char start)
(while (progn
(skip-chars-forward "^!^" (- (line-end-position) toend))
(< (point) (- (line-end-position) toend)))