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

Tidy: Habit preamble

Browse source 
No need for rx-to-string, because it's static.
This commit is contained in:
Adam Porter 2020-01-03 05:47:00 -06:00
parent 84b458d6fe
commit fbff8720b0
1 changed files with 1 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

4
org-ql.el
View file

@ -676,9 +676,7 @@ replace the clause with a preamble."
;; Return nil, don't test the predicate. ;; Return nil, don't test the predicate.
nil) nil)
(`(habit) (`(habit)
;; TODO: Move regexp to const. (setq org-ql-preamble (rx bol (0+ space) ":STYLE:" (1+ space) "habit" (0+ space) eol))
(setq org-ql-preamble (rx-to-string `(seq bol (0+ space) ":STYLE:" (1+ space)
"habit" (0+ space) eol)))
nil) nil)
;; Heading text. ;; Heading text.