Function: ps-prologue-file

ps-prologue-file is a byte-compiled function defined in ps-print.el.gz.

Signature

(ps-prologue-file FILENUMBER)

Documentation

If prologue FILENUMBER exists and is readable, return contents as string.

Note: No major/minor-mode is activated and no local variables are evaluated for
      FILENUMBER, but proper EOL-conversion and character interpretation is
      done!

Source Code

;; Defined in /usr/src/emacs/lisp/ps-print.el.gz
(defun ps-prologue-file (filenumber)
  "If prologue FILENUMBER exists and is readable, return contents as string.

Note: No major/minor-mode is activated and no local variables are evaluated for
      FILENUMBER, but proper EOL-conversion and character interpretation is
      done!"
  (let ((filename (convert-standard-filename
		   (expand-file-name (format "ps-prin%d.ps" filenumber)
				     ps-postscript-code-directory))))
    (if (and (file-exists-p filename)
	     (file-readable-p filename))
	(with-temp-buffer
	  (insert-file-contents filename)
	  (buffer-string))
      (error "ps-print: PostScript prologue `%s' file was not found"
	     filename))))