org-sparse-tree: Fix matching property names containing "-"
* lisp/org.el (org-sparse-tree): Escape "-" in property names. Reported-by: Fabian Kurmann <fabian.kurmann@uni-duesseldorf.de> Link: https://orgmode.org/list/87v87qprwq.fsf@localhost
This commit is contained in:
parent
46909a54e1
commit
63b10621a0
|
@ -10922,6 +10922,9 @@ D Show deadlines and scheduled items between a date range."
|
|||
((?p ?P)
|
||||
(let* ((kwd (completing-read
|
||||
"Property: " (mapcar #'list (org-buffer-property-keys))))
|
||||
(kwd
|
||||
;; Escape "-" in property names.
|
||||
(replace-regexp-in-string "-" "\\\\-" kwd))
|
||||
(value (completing-read
|
||||
"Value: " (mapcar #'list (org-property-values kwd)))))
|
||||
(unless (string-match "\\`{.*}\\'" value)
|
||||
|
|
Loading…
Reference in New Issue