Function: nnml-article-to-file

nnml-article-to-file is a byte-compiled function defined in nnml.el.gz.

Signature

(nnml-article-to-file ARTICLE)

Source Code

;; Defined in /usr/src/emacs/lisp/gnus/nnml.el.gz
;;; Internal functions.

(defun nnml-article-to-file (article)
  (nnml-update-file-alist)
  (let (file)
    (if (setq file
	      (if nnml-use-compressed-files
		  (cdr (assq article nnml-article-file-alist))
		(number-to-string article)))
	(expand-file-name file nnml-current-directory)
      (when (not nnheader-directory-files-is-safe)
	;; Just to make sure nothing went wrong when reading over NFS --
	;; check once more.
	(when (file-exists-p
	       (setq file (expand-file-name (number-to-string article)
					    nnml-current-directory)))
	  (nnml-update-file-alist t)
	  file)))))