Function: mm-extern-anon-ftp

mm-extern-anon-ftp is a byte-compiled function defined in mm-extern.el.gz.

Signature

(mm-extern-anon-ftp HANDLE)

Source Code

;; Defined in /usr/src/emacs/lisp/gnus/mm-extern.el.gz
(defun mm-extern-anon-ftp (handle)
  (erase-buffer)
  (let* ((params (cdr (mm-handle-type handle)))
	 (name (cdr (assq 'name params)))
	 (site (cdr (assq 'site params)))
	 (directory (cdr (assq 'directory params)))
	 (path (concat "/" (or mm-extern-anonymous
			       (read-string (format "ID for %s: " site)))
		       "@" site ":" directory "/" name))
	 (coding-system-for-read mm-binary-coding-system))
    (unless name
      (error "The filename is not specified"))
    (mm-disable-multibyte)
    (mm-insert-file-contents path nil nil nil nil t)))