1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-12 16:23:57 +00:00

(find_field): Make an exception for nil fields.

This commit is contained in:
Stefan Monnier 2002-11-01 19:06:06 +00:00
parent 65b3448598
commit 2db1186a25

View File

@ -531,6 +531,12 @@ find_field (pos, merge_at_boundary, beg_limit, beg, end_limit, end)
at_field_end = 1;
if (!EQ (field, before_field))
at_field_start = 1;
if (NILP (field) && at_field_start && at_field_end)
/* If an inserted char would have a nil field while the surrounding
text is non-nil, we're probably not looking at a
zero-length field, but instead at a non-nil field that's
not intended for editing (such as comint's prompts). */
at_field_end = at_field_start = 0;
}
/* Note about special `boundary' fields: