We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
1 parent 6ec7323 commit fb29106Copy full SHA for fb29106
org-ql-search.el
@@ -322,9 +322,9 @@ this (must be a single line in the Org buffer):
322
(cons 'heading (lambda (element)
323
(let ((normalized-heading
324
(org-ql-search--link-heading-search-string (org-element-property :raw-value element))))
325
- (if not-links
326
- normalized-heading
327
- (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)))))
328
(cons 'priority (lambda (element)
329
(--when-let (org-element-property :priority element)
330
(char-to-string it))))
0 commit comments