Fix: Unused lexical vars

This commit is contained in:
Adam Porter 2018-08-22 14:18:24 -05:00
parent 90aa62a5af
commit e141089633

View file

@ -309,8 +309,8 @@ like one returned by `date-to-day'."
(org-time-string-to-absolute (org-time-string-to-absolute
(org-element-timestamp-interpreter date-element 'ignore)) (org-element-timestamp-interpreter date-element 'ignore))
target-day-number)) target-day-number))
(error "Unknown date-element type: %s" (org-element-property :type date-element))))) (_ (error "Unknown date-element type: %s" (org-element-property :type date-element))))))
(otherwise (user-error "COMPARATOR (%s) must be a function, and DATE (%s) must be a string or day-number integer" (_ (user-error "COMPARATOR (%s) must be a function, and DATE (%s) must be a string or day-number integer"
comparator target-date))))) comparator target-date)))))
(defsubst org-ql--date-plain-p (&optional comparator target-date) (defsubst org-ql--date-plain-p (&optional comparator target-date)