From a44e402b69b5d44afe1dfdd38fec7fcb57d8af38 Mon Sep 17 00:00:00 2001 From: Philip Kaludercic Date: Thu, 10 Jun 2021 19:44:00 +0200 Subject: [PATCH] Preserve incoming order of messages with same timestamp * rcirc.el (rcirc-print): Emulate time-less-or-equal-p --- lisp/net/rcirc.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/net/rcirc.el b/lisp/net/rcirc.el index abe4cfb0b30..50ddb6ca050 100644 --- a/lisp/net/rcirc.el +++ b/lisp/net/rcirc.el @@ -1767,7 +1767,7 @@ connection." (goto-char (or (previous-single-property-change (point) 'hard) (point-min))) (when (let ((then (get-text-property (point) 'rcirc-time))) - (and then (time-less-p then time))) + (and then (not (time-less-p time then)))) (next-single-property-change (point) 'hard) (forward-char 1) (throw 'exit nil)))) -- 2.39.2