We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
1 parent 0e02bc8 commit c2477c9Copy full SHA for c2477c9
org-ql-search.el
@@ -325,9 +325,9 @@ this (must be a single line in the Org buffer):
325
(cons 'heading (lambda (element)
326
(let ((normalized-heading
327
(org-ql-search--link-heading-search-string (org-element-property :raw-value element))))
328
- (if not-links
329
- normalized-heading
330
- (org-ql-search--org-make-link-string normalized-heading (org-link-display-format normalized-heading))))))
+ (pcase links
+ (t (org-ql-search--org-make-link-string normalized-heading (org-link-display-format normalized-heading)))
+ (nil normalized-heading)))))
331
(cons 'priority (lambda (element)
332
(--when-let (org-element-property :priority element)
333
(char-to-string it))))
0 commit comments