Function: org-agenda-file-p

org-agenda-file-p is a byte-compiled function defined in org.el.gz.

Signature

(org-agenda-file-p &optional FILE)

Documentation

Return non-nil, if FILE is an agenda file.

If FILE is omitted, use the file associated with the current buffer.

Source Code

;; Defined in /usr/src/emacs/lisp/org/org.el.gz
(defun org-agenda-file-p (&optional file)
  "Return non-nil, if FILE is an agenda file.
If FILE is omitted, use the file associated with the current
buffer."
  (let ((fname (or file (buffer-file-name))))
    (and fname
         (member (file-truename fname)
                 (mapcar #'file-truename (org-agenda-files t))))))