branch: externals/org
commit 48169da26502fa8c5d4f3e12a58b4de2cac526b9
Author: Ihor Radchenko <[email protected]>
Commit: Ihor Radchenko <[email protected]>
lisp/org.el (org-make-tags-matcher): Suppress compiler warning
---
lisp/org.el | 7 ++++++-
1 file changed, 6 insertions(+), 1 deletion(-)
diff --git a/lisp/org.el b/lisp/org.el
index 3d3aca2a64..09541ea0b9 100644
--- a/lisp/org.el
+++ b/lisp/org.el
@@ -11618,7 +11618,12 @@ See also `org-scan-tags'."
(or tagsmatcher todomatcher t))))
(when org--matcher-tags-todo-only
(setq matcher `(and (member todo org-not-done-keywords) ,matcher)))
- (cons match0 (byte-compile `(lambda (todo tags-list level) ,matcher))))))
+ (cons match0
+ (byte-compile
+ `(lambda (todo tags-list level)
+ ;; Pacify byte-compiler.
+ (ignore todo) (ignore tags-list) (ignore level)
+ ,matcher))))))
(defun org--tags-expand-group (group tag-groups expanded)
"Recursively expand all tags in GROUP, according to TAG-GROUPS.
