emacs-diffs
[Top][All Lists]
Advanced

[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),



reply via email to

[Prev in Thread] Current Thread [Next in Thread]