aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorKenichi Handa2005-03-29 05:48:10 +0000
committerKenichi Handa2005-03-29 05:48:10 +0000
commit51bb954e7ad81cc91cdac77e82a3e73f264ec769 (patch)
tree565dfd47deffef7d9aeb9cbe35be05902758e336
parenteab4bb89764e1b5778335118f1999bdd1b1078ab (diff)
downloademacs-51bb954e7ad81cc91cdac77e82a3e73f264ec769.tar.gz
emacs-51bb954e7ad81cc91cdac77e82a3e73f264ec769.zip
(ps-mule-printable-p): Return t if CHARSET is ascii or
latin-iso8859-1.
-rw-r--r--lisp/ChangeLog2
-rw-r--r--lisp/ps-mule.el5
2 files changed, 6 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 78514349768..eec6cba623a 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -4,6 +4,8 @@
4 ps-print-translation-table. 4 ps-print-translation-table.
5 (ps-mule-begin-job): Call find-charset-region/string with 5 (ps-mule-begin-job): Call find-charset-region/string with
6 ps-print-translation-table. 6 ps-print-translation-table.
7 (ps-mule-printable-p): Return t if CHARSET is ascii or
8 latin-iso8859-1.
7 9
8 * ps-print.el (ps-print-translation-table): New variable. 10 * ps-print.el (ps-print-translation-table): New variable.
9 (ps-plot-region): Translate characters by 11 (ps-plot-region): Translate characters by
diff --git a/lisp/ps-mule.el b/lisp/ps-mule.el
index 3f66ba2368f..e0e9268c3de 100644
--- a/lisp/ps-mule.el
+++ b/lisp/ps-mule.el
@@ -511,7 +511,10 @@ element of the list."
511 511
512(defsubst ps-mule-printable-p (charset) 512(defsubst ps-mule-printable-p (charset)
513 "Non-nil if characters in CHARSET is printable." 513 "Non-nil if characters in CHARSET is printable."
514 (ps-mule-get-font-spec charset 'normal)) 514 ;; ASCII and Latin-1 are always printable.
515 (or (eq charset 'ascii)
516 (eq charset 'latin-iso8859-1)
517 (ps-mule-get-font-spec charset 'normal)))
515 518
516(defconst ps-mule-external-libraries 519(defconst ps-mule-external-libraries
517 '((builtin nil nil 520 '((builtin nil nil