From 48169da26502fa8c5d4f3e12a58b4de2cac526b9 Mon Sep 17 00:00:00 2001
From: Ihor Radchenko <yantar92@posteo.net>
Date: Mon, 6 May 2024 12:57:45 +0300
Subject: [PATCH] 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 3d3aca2a6..09541ea0b 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.