summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorPedro <pedro@cas.cat>2024-03-26 18:19:23 +0300
committerIhor Radchenko <yantar92@posteo.net>2024-03-26 18:19:23 +0300
commitd4056ce5d5611e1c971c151f182a2d407226fdb1 (patch)
treedbd7c2c980212d0f87950844a58869f5e2a4ab93
parente44255be733fc2adc66c5e742ce7b96e85c86d3f (diff)
lisp/org-collector.el: Read `org-link-bracket-re' without evaluating
When the property's value is a `org-link-bracket-re', it should not be wrongly interpreted and processed as an emacs lisp expression. Current situation also prevents filtering items based on matching some text in the link (it is ignored because is an emacs lisp expression). * lisp/org-collector.el (org-propview-collect): Inhibit evaluation when value is a bracket link.
-rw-r--r--lisp/org-collector.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/org-collector.el b/lisp/org-collector.el
index cdc92ae..b645d3a 100644
--- a/lisp/org-collector.el
+++ b/lisp/org-collector.el
@@ -188,7 +188,8 @@ variables and values specified in props"
(mapcar (lambda (props)
(mapcar (lambda (pair)
(let ((inhibit-lisp-eval (or (string= (car pair) "ITEM")
- (string-match-p org-ts-regexp-inactive (cdr pair)))))
+ (string-match-p org-ts-regexp-inactive (cdr pair))
+ (string-match-p org-link-bracket-re (cdr pair)))))
(condition-case err
(cons (car pair) (org-babel-read (cdr pair) inhibit-lisp-eval))
(error