Change of ps-print font size variable name.

(ps-mule-generate-font): Fun fix.
(ps-mule-begin-job): Programming uniformization.

1 files changed, 2 insertions, 2 deletions

diff --git a/lisp/ps-mule.el b/lisp/ps-mule.el
index 9847f25ef7b..727c76ba02c 100644
--- a/lisp/ps-mule.el
+++ b/lisp/ps-mule.el
@@ -7,7 +7,7 @@
 ;; Maintainer:  Kenichi Handa <handa@etl.go.jp> (multi-byte characters)
 ;; Maintainer:  Vinicius Jose Latorre <vinicius@cpqd.com.br>
 ;; Keywords:    print, PostScript, multibyte, mule
-;; Time-stamp:  <98/12/15 14:04:50 handa>
+;; Time-stamp:  <99/02/19 13:15:52 vinicius>
 
 ;; This file is part of GNU Emacs.
 
@@ -485,7 +485,7 @@ See the documentation of `ps-mule-get-font-spec' for FONT-SPEC's meaning."
          (ps-output-prologue (funcall func charset font-spec)))
     (ps-output-prologue
      (list (format "/%s %f /%s Def%sFontMule\n"
-                   scaled-font-name ps-font-size font-name
+                   scaled-font-name ps-font-size-internal font-name
                    (if (eq ps-mule-current-charset 'ascii) "Ascii" ""))))
     (if font-cache
         (setcar (cdr font-cache)