Fix: (--date-type-p) Handle ranges

I meant to do this in c5599a6, but I omitted the range type symbol
when I rewrote the selector and functions.  This should work now.

Thanks to @codygman, @swflint, and @vikasrawal.
This commit is contained in:
Adam Porter 2019-07-17 12:04:28 -05:00
parent 25ed67a37d
commit 25f964dfcb
2 changed files with 4 additions and 1 deletions

View file

@ -236,6 +236,9 @@ If ~MARKERS~ is non-nil, ~org-agenda-ng--add-markers~ is used to add markers to
*Changed* *Changed*
+ ~(regexp)~ selector accepts multiple regexps to test. + ~(regexp)~ selector accepts multiple regexps to test.
*Fixed*
+ Handle date ranges in date-based selectors. (Thanks to [[https://github.com/codygman][Cody Goodman]], [[https://github.com/swflint][Samuel W. Flint]], and [[https://github.com/vikasrawal][Vikas Rawal]].)
*Compatibility* *Compatibility*
+ Fixes for compatibility with Org 9.2. (Thanks to [[https://github.com/ataias][Ataias Pereira Reis]] and [[https://github.com/dakra][Daniel Kraus]].) + Fixes for compatibility with Org 9.2. (Thanks to [[https://github.com/ataias][Ataias Pereira Reis]] and [[https://github.com/dakra][Daniel Kraus]].)

View file

@ -735,7 +735,7 @@ like one returned by `date-to-day'."
(string (date-to-day (concat target-date " 00:00"))) (string (date-to-day (concat target-date " 00:00")))
(integer target-date)))) (integer target-date))))
(pcase (org-element-property :type date-element) (pcase (org-element-property :type date-element)
((or 'active 'inactive) ((or 'active 'inactive 'active-range 'inactive-range)
(funcall comparator (funcall comparator
(org-time-string-to-absolute (org-time-string-to-absolute
(org-element-timestamp-interpreter date-element 'ignore)) (org-element-timestamp-interpreter date-element 'ignore))