diff options
author | Kyle Meyer <kyle@kyleam.com> | 2022-01-30 20:38:01 -0500 |
---|---|---|
committer | Kyle Meyer <kyle@kyleam.com> | 2022-01-30 20:38:01 -0500 |
commit | 6f282b31ad7548ab744565144e0d30dd56774210 (patch) | |
tree | c97b828d6108c02d35389c974f9d7a8c4b8db14d /lisp/org/org-agenda.el | |
parent | 6636231b2ce554b88379da06ca6cd2de62dfaa3a (diff) | |
download | emacs-6f282b31ad7548ab744565144e0d30dd56774210.tar.gz |
Update to Org 9.5.2-13-gdd6486
Diffstat (limited to 'lisp/org/org-agenda.el')
-rw-r--r-- | lisp/org/org-agenda.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/org/org-agenda.el b/lisp/org/org-agenda.el index 94aea1b0a32..ae0058e037e 100644 --- a/lisp/org/org-agenda.el +++ b/lisp/org/org-agenda.el @@ -99,8 +99,8 @@ ;; Defined somewhere in this file, but used before definition. (defvar org-agenda-buffer-name "*Org Agenda*") -(defvar org-agenda-overriding-header nil) (defvar org-agenda-title-append nil) +(defvar org-agenda-overriding-header) ;; (with-no-warnings (defvar entry)) ;; unprefixed, from calendar.el ;; (with-no-warnings (defvar date)) ;; unprefixed, from calendar.el (defvar original-date) ; dynamically scoped, calendar.el does scope this @@ -2158,7 +2158,7 @@ string that it returns." (org-remap org-agenda-mode-map 'move-end-of-line 'org-agenda-end-of-line) (defvar org-agenda-menu) ; defined later in this file. -(defvar org-agenda-restrict nil) ; defined later in this file. +(defvar org-agenda-restrict nil) (defvar org-agenda-follow-mode nil) (defvar org-agenda-entry-text-mode nil) (defvar org-agenda-clockreport-mode nil) @@ -7288,7 +7288,7 @@ When TYPE is \"scheduled\", \"deadline\", \"timestamp\" or \"timestamp_ia\", compare within each of these type. When TYPE is the empty string, compare all timestamps without respect of 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) "")) (get-text-property 1 'ts-date a)) def)) |