mirrors/org-mode
0
0
Fork 1
mirror of https://git.savannah.gnu.org/git/emacs/org-mode.git synced 2024-09-29 22:07:49 +00:00
Code Releases Activity

Backport commit 221a3272a from Emacs

Browse source 
* lisp/org-table.el (org-table-message-once-per-second):
Fix bug when clock difference goes past a 65536-second boundary.
Don’t assume particular format for current-time result.

Fix org-table 65536-second bug
221a3272ad4a1befb41dda2990d672782bc0257f
Paul Eggert
Mon Aug 19 18:05:15 2019 -0700

Note(km): time-less-p and time-subtract have been replaced with the
corresponding Org compatibility functions.
This commit is contained in:
Paul Eggert 2019-08-19 18:04:56 -07:00 committed by Kyle Meyer
parent 9e1b9fe627
commit 190a3b6c4e
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
lisp/org-table.el
View file

@ -3190,7 +3190,7 @@ ARGS are passed as arguments to the `message' function. Returns
current time if a message is printed, otherwise returns T1. If
T1 is nil, always messages."
(let ((curtime (current-time)))
(if (or (not t1) (< 0 (nth 1 (time-subtract curtime t1))))
(if (or (not t1) (org-time-less-p 1 (org-time-subtract curtime t1)))
(progn (apply 'message args)
curtime)
t1)))