Schedule and ts predicates exclude date ranges

[magogware]

I'm trying to set up an org-ql-block that shows items scheduled for today with the following code:

            (org-ql-block '(and (todo "TODO")
                                (scheduled :on today))
                          ((org-ql-block-header "On today")))

I've also tried:

           (org-ql-block '(and (todo "TODO")
                               (ts-active :on today))
                          ((org-ql-block-header "On today")))

Items that have a scheduled property that is a single date (of the form <2022-10-24 Mon 23:30>) will show up in this block, but any items that have a scheduled property that is a range (of the form <2022-10-24 Mon 23:30-23:45>), even if both ends of the range fall within the specified date predicate, are excluded.

[magogware]

Duplicate of #237