Function: mh-ps-spool-buffer

mh-ps-spool-buffer is a byte-compiled function defined in mh-print.el.gz.

Signature

(mh-ps-spool-buffer BUFFER)

Documentation

Spool BUFFER.

Source Code

;; Defined in /usr/src/emacs/lisp/mh-e/mh-print.el.gz
(defun mh-ps-spool-buffer (buffer)
  "Spool BUFFER."
  (with-current-buffer buffer
    (let ((ps-print-color-p mh-ps-print-color-option)
          (ps-left-header
           (list
            (concat "(" (mh-get-header-field "Subject:") ")")
            (concat "(" (mh-get-header-field "From:") ")")))
          (ps-right-header
           (list
            "/pagenumberstring load"
            (concat "(" (mh-get-header-field "Date:") ")"))))
      (funcall mh-ps-print-func))))