changeset 65748:980399883216

(ps-mule-show-warning): If a character is in ps-print-translation-table, don't treat it as non-printable.
author Kenichi Handa <handa@m17n.org>
date Fri, 30 Sep 2005 07:00:11 +0000
parents cfaa6269b03d
children d60c08a57a67
files lisp/ps-mule.el
diffstat 1 files changed, 2 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/ps-mule.el	Fri Sep 30 06:28:53 2005 +0000
+++ b/lisp/ps-mule.el	Fri Sep 30 07:00:11 2005 +0000
@@ -1415,7 +1415,8 @@
 	(goto-char from)
 	(while (and (<= (length char-pos-list) max-unprintable-chars)
 		    (re-search-forward "\\cu" to t))
-	  (push (cons (preceding-char) (1- (point))) char-pos-list))))
+	  (or (aref ps-print-translation-table (preceding-char))
+	      (push (cons (preceding-char) (1- (point))) char-pos-list)))))
     (with-output-to-temp-buffer "*Warning*"
       (with-current-buffer standard-output
 	(when char-pos-list