From: Stefan Monnier <monnier@iro.umontreal.ca>
Date: Sat, 24 Feb 2024 17:23:41 +0000 (-0500)
Subject: * src/editfns.c (Fget_pos_property): Fix thinko (bug#69358)
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=4e6795af05834933bc363a70491e6d20c29e9532;p=emacs.git

* src/editfns.c (Fget_pos_property): Fix thinko (bug#69358)

(cherry picked from commit 56beeff14365d8e802ab7b4888aa7e95b2cf9509)
---

diff --git a/src/editfns.c b/src/editfns.c
index cce52cddbf8..4ccf765bd4b 100644
--- a/src/editfns.c
+++ b/src/editfns.c
@@ -301,8 +301,8 @@ at POSITION.  */)
       struct buffer *obuf = current_buffer;
       struct itree_node *node;
       struct sortvec items[2];
-      struct sortvec *result = NULL;
       struct buffer *b = XBUFFER (object);
+      struct sortvec *result = NULL;
       Lisp_Object res = Qnil;
 
       set_buffer_temp (b);
@@ -326,7 +326,10 @@ at POSITION.  */)
           if (NILP (res)
               || (make_sortvec_item (this, node->data),
                   compare_overlays (result, this) < 0))
-            res = tem;
+            {
+              result = this;
+              res = tem;
+            }
 	}
       set_buffer_temp (obuf);