From: Miles Bader <miles@gnu.org>
Date: Wed, 28 Aug 2002 04:40:42 +0000 (+0000)
Subject: (comint-carriage-motion): Start at START.
X-Git-Tag: ttn-vms-21-2-B4~13532
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=dd77cb223ba1799e63b640e3789e25d20c74c25a;p=emacs.git

(comint-carriage-motion): Start at START.
---

diff --git a/lisp/comint.el b/lisp/comint.el
index 31524572a51..8eb7fa776ef 100644
--- a/lisp/comint.el
+++ b/lisp/comint.el
@@ -1552,6 +1552,7 @@ Make backspaces delete the previous character."
     ;; First do a quick check to see if there are any applicable
     ;; characters, so we can avoid calling save-match-data and
     ;; save-restriction if not.
+    (goto-char start)
     (when (< (skip-chars-forward "^\b\r" end) (- end start))
       (save-match-data
 	(save-restriction