Preserve incoming order of messages with same timestamp

* rcirc.el (rcirc-print): Emulate time-less-or-equal-p
This commit is contained in:
Philip Kaludercic 2021-06-10 19:44:00 +02:00
parent fd96e3a0d9
commit a44e402b69

View file

@ -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))))