diff options
| author | Miles Bader <miles@gnu.org> | 2000-08-14 12:56:03 +0000 |
|---|---|---|
| committer | Miles Bader <miles@gnu.org> | 2000-08-14 12:56:03 +0000 |
| commit | 1cc9bc49d80b832999f941090aec4dc458d32b51 (patch) | |
| tree | b634adce9a724b0d8f8af73034b75ca0bdeb3dbd /lisp/comint.el | |
| parent | 90cbf47ef1911fd5a5f040c110fbc317d167a4b6 (diff) | |
| download | emacs-1cc9bc49d80b832999f941090aec4dc458d32b51.tar.gz | |
(comint-bol): Use `forward-line 0' instead of calling beginning-of-line
with inhibit-field-text-motion bound.
Diffstat (limited to 'lisp/comint.el')
| -rw-r--r-- | lisp/comint.el | 5 |
1 files changed, 2 insertions, 3 deletions
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 |