Mercurial > emacs

changeset 30782:bc1377250f7c

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(comint-bol): Use `forward-line 0' instead of calling beginning-of-line with inhibit-field-text-motion bound.
author Miles Bader <miles@gnu.org>
date Mon, 14 Aug 2000 12:56:03 +0000
parents 59479ef35bf2
children 6134e3d42e3b
files lisp/comint.el
diffstat 1 files changed, 2 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/comint.el	Mon Aug 14 12:45:50 2000 +0000
+++ b/lisp/comint.el	Mon Aug 14 12:56:03 2000 +0000
@@ -1740,9 +1740,8 @@
 `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