Function: nnml-parse-head

nnml-parse-head is a byte-compiled function defined in nnml.el.gz.

Signature

(nnml-parse-head CHARS &optional NUMBER)

Documentation

Parse the head of the current buffer.

Source Code

;; Defined in /usr/src/emacs/lisp/gnus/nnml.el.gz
(defun nnml-parse-head (chars &optional number)
  "Parse the head of the current buffer."
  (save-excursion
    (save-restriction
      (unless (zerop (buffer-size))
	(narrow-to-region
	 (goto-char (point-min))
	 (if (re-search-forward "\n\r?\n" nil t)
	     (1- (point))
	   (point-max))))
      (let ((headers (nnheader-parse-head t)))
	(setf (mail-header-chars  headers) chars)
	(setf (mail-header-number headers) number)
	;; If there's non-ASCII raw characters in the data,
	;; RFC2047-encode them to avoid having arbitrary data in the
	;; .overview file.
	(nnml--encode-headers headers)
	headers))))