From: Philip Kaludercic <philipk@posteo.net>
Date: Mon, 17 Jul 2023 20:02:38 +0000 (+0200)
Subject: ; Improve accuracy of out-out-order message insertion
X-Git-Tag: emacs-29.1-rc1~27
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=ce3f9fba1a32260ff837d689ac6928a75bab86d9;p=emacs.git

; Improve accuracy of out-out-order message insertion

* lisp/net/rcirc.el (rcirc-print): Do not ignore the return value of
'next-single-property-change'.
---

diff --git a/lisp/net/rcirc.el b/lisp/net/rcirc.el
index cf1b952086a..1ddffe8dec9 100644
--- a/lisp/net/rcirc.el
+++ b/lisp/net/rcirc.el
@@ -2059,7 +2059,7 @@ connection."
                              (point-min)))
               (when (let ((then (get-text-property (point) 'rcirc-time)))
                       (and then (not (time-less-p time then))))
-                (next-single-property-change (point) 'hard)
+                (goto-char (next-single-property-change (point) 'hard))
                 (forward-char 1)
                 (throw 'exit nil))))
           (goto-char (line-beginning-position))