[elpa] externals/tempel 5410821b3c 1/2: Fix for Emacs 29

[ELPA Syncer]

branch: externals/tempel
commit 5410821b3cf239c03649ecba88d7b733a331f7d7
Author: Daniel Mendler <mail@daniel-mendler.de>
Commit: Daniel Mendler <mail@daniel-mendler.de>

    Fix for Emacs 29
---
 tempel.el | 9 ++++++---
 1 file changed, 6 insertions(+), 3 deletions(-)

diff --git a/tempel.el b/tempel.el
index 16c947eb9e..dd78a59f72 100644
--- a/tempel.el
+++ b/tempel.el
@@ -525,9 +525,12 @@ This is meant to be a source in `tempel-template-sources'."
 
 (defun tempel--field-at-point ()
   "Return the field overlay at point."
-  (cl-loop for ov in (overlays-in (max (point-min) (1- (point)))
-                                  (min (point-max) (1+ (point))))
-           thereis (and (overlay-get ov 'tempel--field) ov)))
+  (let ((start most-positive-fixnum) field)
+    (dolist (ov (overlays-in (max (point-min) (1- (point)))
+                             (min (point-max) (1+ (point)))))
+      (when (and (overlay-get ov 'tempel--field) (< (overlay-start ov) start))
+        (setq start (overlay-start ov) field ov)))
+    field))
 
 (defun tempel-kill ()
   "Kill the field contents."