From dd77cb223ba1799e63b640e3789e25d20c74c25a Mon Sep 17 00:00:00 2001 From: Miles Bader Date: Wed, 28 Aug 2002 04:40:42 +0000 Subject: [PATCH] (comint-carriage-motion): Start at START. --- lisp/comint.el | 1 + 1 file changed, 1 insertion(+) 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 -- 2.39.5