diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/editfns.c | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/src/editfns.c b/src/editfns.c index bf4976273aa..57c96ff7844 100644 --- a/src/editfns.c +++ b/src/editfns.c | |||
| @@ -531,6 +531,12 @@ find_field (pos, merge_at_boundary, beg_limit, beg, end_limit, end) | |||
| 531 | at_field_end = 1; | 531 | at_field_end = 1; |
| 532 | if (!EQ (field, before_field)) | 532 | if (!EQ (field, before_field)) |
| 533 | at_field_start = 1; | 533 | at_field_start = 1; |
| 534 | if (NILP (field) && at_field_start && at_field_end) | ||
| 535 | /* If an inserted char would have a nil field while the surrounding | ||
| 536 | text is non-nil, we're probably not looking at a | ||
| 537 | zero-length field, but instead at a non-nil field that's | ||
| 538 | not intended for editing (such as comint's prompts). */ | ||
| 539 | at_field_end = at_field_start = 0; | ||
| 534 | } | 540 | } |
| 535 | 541 | ||
| 536 | /* Note about special `boundary' fields: | 542 | /* Note about special `boundary' fields: |