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

Tidy: Compilation warnings

Browse source
This commit is contained in:
Adam Porter 2023-03-09 03:23:42 -06:00
parent d86a402ba5
commit d21da3682b
9 changed files with 68 additions and 47 deletions
Download patch file Download diff file Expand all files Collapse all files

6
tests/test-org-ql.el
View file

@ -30,6 +30,7 @@
(require 'with-simulated-input)
(require 'org-ql)
(require 'org-ql-search)
(require 'org-ql-view)
;;;; Variables
@ -200,7 +201,10 @@ with keyword arg NOW in PLIST."
(insert "* Heading 1")
;; FIXME: `--value-at' does not actually move point, so we do it here.
(goto-char (point-min))
(expect (org-ql--value-at (point-min) #'org-get-local-tags)
(expect (org-ql--value-at (point-min)
;; TODO: Just use org-get-tags when requiring Org 9.2+.
(cond ((fboundp 'org-get-tags) #'org-get-tags)
((fboundp 'org-get-local-tags) #'org-get-local-tags)))
:to-be nil))))
(describe "Query pre-processing"