summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorLars Ingebrigtsen <larsi@gnus.org>2021-12-21 05:25:50 +0100
committerLars Ingebrigtsen <larsi@gnus.org>2021-12-21 05:25:50 +0100
commitcf2597da0ddf81c3b7a3894449d7e416c1be8200 (patch)
treeab99afc48bb6b7b0b036e872b74d5baa52612eb0
parent18ce031f9b21942586255fca86a5acf364742600 (diff)
downloademacs-cf2597da0ddf81c3b7a3894449d7e416c1be8200.tar.gz
Revert "Speed up find_field when called from outside a field"
This reverts commit 4d8af56c76ee20bc8e1ebdeef5c4100cea005974. This leads to lisp-mode-tests failures
-rw-r--r--src/editfns.c21
1 files changed, 0 insertions, 21 deletions
diff --git a/src/editfns.c b/src/editfns.c
index 355a7a3e299..5c9c34dc352 100644
--- a/src/editfns.c
+++ b/src/editfns.c
@@ -437,27 +437,6 @@ find_field (Lisp_Object pos, Lisp_Object merge_at_boundary,
after_field
= get_char_property_and_overlay (pos, Qfield, Qnil, NULL);
-
- /* We're not in a field, so find the prev/next area with a field
- property. */
- if (NILP (after_field))
- {
- if (beg)
- {
- Lisp_Object p = Fprevious_single_char_property_change (pos, Qfield,
- Qnil,
- beg_limit);
- *beg = NILP (p) ? BEGV : XFIXNAT (p);
- }
- if (end)
- {
- Lisp_Object p = Fnext_single_char_property_change (pos, Qfield, Qnil,
- end_limit);
- *end = NILP (p) ? ZV : XFIXNAT (p);
- }
- return;
- }
-
before_field
= (XFIXNAT (pos) > BEGV
? get_char_property_and_overlay (make_fixnum (XFIXNUM (pos) - 1),