From: Miles Bader <miles@gnu.org>
Date: Mon, 14 Aug 2000 12:56:03 +0000 (+0000)
Subject: (comint-bol): Use `forward-line 0' instead of calling beginning-of-line
X-Git-Tag: emacs-pretest-21.0.90~2331
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=1cc9bc49d80b832999f941090aec4dc458d32b51;p=emacs.git

(comint-bol): Use `forward-line 0' instead of calling beginning-of-line
  with inhibit-field-text-motion bound.
---

diff --git a/lisp/comint.el b/lisp/comint.el
index c7762678dd4..da9e2797749 100644
--- a/lisp/comint.el
+++ b/lisp/comint.el
@@ -1740,9 +1740,8 @@ prompt skip is done by skipping text matching the regular expression
 `comint-prompt-regexp', a buffer local variable."
   (interactive "P")
   (if arg
-      ;; Disregard prompt
-      (let ((inhibit-field-text-motion t))
-	(beginning-of-line))
+      ;; Unlike `beginning-of-line', forward-line ignores field boundaries
+      (forward-line 0)
     (goto-char (comint-line-beginning-position))))
 
 ;; These three functions are for entering text you don't want echoed or