# HG changeset patch
# User Kenichi Handa <handa@m17n.org>
# Date 929434295 0
# Node ID 06b633c9f37ba7be31931b374707b3d559b44461
# Parent  c3ad4583628b08900ff8c8ace10bde595d2a9a6e
(ps-control-character): Fix previous change.

diff -r c3ad4583628b -r 06b633c9f37b lisp/ps-print.el
--- a/lisp/ps-print.el	Tue Jun 15 05:48:18 1999 +0000
+++ b/lisp/ps-print.el	Tue Jun 15 08:11:35 1999 +0000
@@ -3837,7 +3837,7 @@
     (if (< (car wrappoint) to)
 	(ps-continue-line))
     (setq ps-width-remaining (- ps-width-remaining (* len char-width)))
-    (ps-mule-prepare-ascii-font)
+    (ps-mule-prepare-ascii-font str)
     (ps-output-string str)
     (ps-output " S\n")))