Mercurial > emacs
changeset 43981:1b2a6ccacf7b
(dabbrev--goto-start-of-abbrev): Put a limit on field-beginning search.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Mon, 18 Mar 2002 04:24:57 +0000 |
parents | f631e828090d |
children | a40fcee55faa |
files | lisp/dabbrev.el |
diffstat | 1 files changed, 3 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/dabbrev.el Mon Mar 18 04:24:09 2002 +0000 +++ b/lisp/dabbrev.el Mon Mar 18 04:24:57 2002 +0000 @@ -599,7 +599,9 @@ (progn (forward-char -1) (while (and (looking-at dabbrev--abbrev-char-regexp) - (not (= (point) (field-beginning (point))))) + (not (bobp)) + (not (= (point) (field-beginning (point) nil + (1- (point)))))) (forward-char -1)) (or (looking-at dabbrev--abbrev-char-regexp) (forward-char 1))))