ps-setup

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index fb1277c957c3244c5c997b682ae5ab5dc653f9f1..d6a7617579b535d10334fbb064dc2d1ed368c093 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -4,6 +4,7 @@
        Use (featurep 'xemacs) instead of (eq ps-print-emacs-type 'xemacs).
        Eliminate eval-and-compile usage.
        (ps-insert-file): Use insert-file-contents instead of insert-file.
+       (ps-setup): Code fix.
 
 2004-11-21  Jay Belanger  <belanger@truman.edu>
 

diff --git a/lisp/ps-print.el b/lisp/ps-print.el
index d238421798ade9733facf7e1803aa03aa35883ca..c37f21224fca291164b00716c112159998f17924 100644 (file)
--- a/lisp/ps-print.el
+++ b/lisp/ps-print.el
@@ -3592,6 +3592,7 @@ The table depends on the current ps-print setup."
      (list
       (concat "\n;;; ps-print version " ps-print-version "\n")
       ";; internal vars"
+      (ps-comment-string "emacs-version      " emacs-version)
       (ps-comment-string "ps-print-emacs-type" ps-print-emacs-type)
       (ps-comment-string "ps-windows-system  " ps-windows-system)
       (ps-comment-string "ps-lp-system       " ps-lp-system)