Merge branch 'bugfix'

This commit is contained in:
Ihor Radchenko 2022-01-30 15:41:49 +08:00
commit 589cc0732e
No known key found for this signature in database
GPG Key ID: 6470762A7DA11D8B
1 changed files with 1 additions and 1 deletions

View File

@ -7743,7 +7743,7 @@ When TYPE is \"scheduled\", \"deadline\", \"timestamp\" or
\"timestamp_ia\", compare within each of these type. When TYPE \"timestamp_ia\", compare within each of these type. When TYPE
is the empty string, compare all timestamps without respect of is the empty string, compare all timestamps without respect of
their type." their type."
(let* ((def (and (not org-agenda-sort-notime-is-late) -1)) (let* ((def (if org-agenda-sort-notime-is-late 99999999 -1))
(ta (or (and (string-match type (or (get-text-property 1 'type a) "")) (ta (or (and (string-match type (or (get-text-property 1 'type a) ""))
(get-text-property 1 'ts-date a)) (get-text-property 1 'ts-date a))
def)) def))