jiri/org-ql
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Comment: Remove done TODOs

Browse source 
I wish I could remember to remove these when I commit the code that
does them!
This commit is contained in:
Adam Porter 2019-09-09 20:38:31 -05:00
parent 622f0e6d5e
commit 6a93e887cc
1 changed files with 0 additions and 9 deletions
Download patch file Download diff file Expand all files Collapse all files

9
org-ql.el
View file

@ -214,9 +214,6 @@ returns nil or non-nil."
`(lambda (&rest _ignore)
,action)))
(_ (user-error "Invalid action form: %s" action))))
;; TODO: Figure out how to use or reimplement the org-scanner-tags feature.
;; (org-use-tag-inheritance t)
;; (org-trust-scanner-tags t)
(org-ql--today (ts-now))
(items (->> buffers
(--map (with-current-buffer it
@ -812,8 +809,6 @@ With KEYWORDS, return non-nil if its keyword is one of KEYWORDS (a list of strin
(org-ql--defpred tags (&rest tags)
"Return non-nil if current heading has one or more of TAGS (a list of strings).
Tests both inherited and local tags."
;; TODO: Try to use `org-make-tags-matcher' to improve performance. It would be nice to not have
;; to run `org-get-tags' for every heading, especially with inheritance.
(cl-macrolet ((tags-p (tags)
`(and ,tags
(not (eq 'org-ql-nil ,tags)))))
@ -829,8 +824,6 @@ Tests both inherited and local tags."
(org-ql--defpred tags-inherited (&rest tags)
"Return non-nil if current heading's inherited tags include one or more of TAGS (a list of strings).
If TAGS is nil, return non-nil if heading has any inherited tags."
;; TODO: Try to use `org-make-tags-matcher' to improve performance. It would be nice to not have
;; to run `org-get-tags' for every heading, especially with inheritance.
(cl-macrolet ((tags-p (tags)
`(and ,tags
(not (eq 'org-ql-nil ,tags)))))
@ -843,8 +836,6 @@ If TAGS is nil, return non-nil if heading has any inherited tags."
(org-ql--defpred tags-local (&rest tags)
"Return non-nil if current heading's local tags include one or more of TAGS (a list of strings).
If TAGS is nil, return non-nil if heading has any local tags."
;; TODO: Try to use `org-make-tags-matcher' to improve performance. It would be nice to not have
;; to run `org-get-tags' for every heading, especially with inheritance.
(cl-macrolet ((tags-p (tags)
`(and ,tags
(not (eq 'org-ql-nil ,tags)))))