diff --git a/org-ql-view.el b/org-ql-view.el
index 941225b..20eb02e 100644
--- a/org-ql-view.el
+++ b/org-ql-view.el
@@ -841,6 +841,8 @@ current buffer.  Otherwise BUFFERS-FILES is returned unchanged."
                            (concat "'" (prin1-to-string buffers-files))))))
       ((pred (equal (current-buffer)))
        "buffer")
+      ((or 'org-agenda-files '(function org-agenda-files))
+       "org-agenda-files")
       (_ (let ((print-length nil))
            (prin1-to-string buffers-files))))))