Fix predicate parsing in helm-org-ql

This commit is contained in:
Ihor Radchenko 2020-06-16 13:09:10 +08:00
parent 317df58d98
commit f7e77989f7

View file

@ -1708,8 +1708,8 @@ Multiple predicates are combined with BOOLEAN."
(and predicate-without-args `(pred -- (list (intern pred))))
(and plain-string `(s -- (list 'regexp s)))))
(plain-string (or quoted-arg unquoted-arg))
(predicate-with-args (substring predicate) ":" args)
(predicate-without-args (substring predicate) ":")
(predicate-with-args (and (substring predicate) ":" args))
(predicate-without-args (and (substring predicate) ":"))
(predicate (or ,@predicates))
(args (list (+ (and (or keyword-arg quoted-arg unquoted-arg) (opt separator)))))
(keyword-arg (and keyword "=" `(kw -- (intern (concat ":" kw)))))