aboutsummaryrefslogtreecommitdiffstats
path: root/src/editfns.c
diff options
context:
space:
mode:
authorMiles Bader2000-10-16 07:28:24 +0000
committerMiles Bader2000-10-16 07:28:24 +0000
commitf657bbf68b814be8f8cf4c57cdc8d1d5218ab9c9 (patch)
tree0de855882d271fe5b78369bbadc0daf5ea718b1e /src/editfns.c
parentbd9e92878be4d85998560efbefcedf45c26dccec (diff)
downloademacs-f657bbf68b814be8f8cf4c57cdc8d1d5218ab9c9.tar.gz
emacs-f657bbf68b814be8f8cf4c57cdc8d1d5218ab9c9.zip
(Fconstrain_to_field): Check carefully for field boundaries if either
OLD_POS or NEW_POS has a non-nil field property, even if they're the same.
Diffstat (limited to 'src/editfns.c')
-rw-r--r--src/editfns.c3
1 files changed, 2 insertions, 1 deletions
diff --git a/src/editfns.c b/src/editfns.c
index 4f7a7c7db1f..57dbdaae0cc 100644
--- a/src/editfns.c
+++ b/src/editfns.c
@@ -612,7 +612,8 @@ Field boundaries are not noticed if `inhibit-field-text-motion' is non-nil.")
612 612
613 if (NILP (Vinhibit_field_text_motion) 613 if (NILP (Vinhibit_field_text_motion)
614 && !EQ (new_pos, old_pos) 614 && !EQ (new_pos, old_pos)
615 && !char_property_eq (Qfield, new_pos, old_pos) 615 && (!NILP (Fget_char_property (new_pos, Qfield, Qnil))
616 || !NILP (Fget_char_property (old_pos, Qfield, Qnil)))
616 && (NILP (inhibit_capture_property) 617 && (NILP (inhibit_capture_property)
617 || NILP (Fget_char_property(old_pos, inhibit_capture_property, Qnil)))) 618 || NILP (Fget_char_property(old_pos, inhibit_capture_property, Qnil))))
618 /* NEW_POS is not within the same field as OLD_POS; try to 619 /* NEW_POS is not within the same field as OLD_POS; try to