[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master cf2597d 5/5: Revert "Speed up find_field when called from outside
From: |
Lars Ingebrigtsen |
Subject: |
master cf2597d 5/5: Revert "Speed up find_field when called from outside a field" |
Date: |
Mon, 20 Dec 2021 23:26:16 -0500 (EST) |
branch: master
commit cf2597da0ddf81c3b7a3894449d7e416c1be8200
Author: Lars Ingebrigtsen <larsi@gnus.org>
Commit: Lars Ingebrigtsen <larsi@gnus.org>
Revert "Speed up find_field when called from outside a field"
This reverts commit 4d8af56c76ee20bc8e1ebdeef5c4100cea005974.
This leads to lisp-mode-tests failures
---
src/editfns.c | 21 ---------------------
1 file changed, 21 deletions(-)
diff --git a/src/editfns.c b/src/editfns.c
index 355a7a3..5c9c34d 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),