Function: ps-mode-epsf-rich

ps-mode-epsf-rich is an interactive and byte-compiled function defined in ps-mode.el.gz.

Signature

(ps-mode-epsf-rich)

Documentation

Insert rich EPSF template.

Key Bindings

Source Code

;; Defined in /usr/src/emacs/lisp/progmodes/ps-mode.el.gz
(defun ps-mode-epsf-rich ()
  "Insert rich EPSF template."
  (interactive)
  (ps-mode-epsf-sparse)
  (forward-line -3)
  (when buffer-file-name
    (insert "%%Title: " (file-name-nondirectory buffer-file-name) "\n"))
  (insert "%%Creator: " (user-full-name) "\n")
  (insert "%%CreationDate: " (current-time-string) "\n")
  (insert "%%EndComments\n")
  (forward-line 3))