diff options
| author | Kenichi Handa | 2005-09-30 07:01:40 +0000 |
|---|---|---|
| committer | Kenichi Handa | 2005-09-30 07:01:40 +0000 |
| commit | 070860c37ab005c2c94276e2230c4bfe67f50c14 (patch) | |
| tree | f42110db7f6d843e34ffe465e3a0eca3e4d36205 | |
| parent | 01c5577a875e794fbf2b18a961efb6316afc0e55 (diff) | |
| download | emacs-070860c37ab005c2c94276e2230c4bfe67f50c14.tar.gz emacs-070860c37ab005c2c94276e2230c4bfe67f50c14.zip | |
(ps-mule-show-warning): If a character is in
ps-print-translation-table, don't treat it as non-printable.
| -rw-r--r-- | lisp/ChangeLog | 5 | ||||
| -rw-r--r-- | lisp/ps-mule.el | 3 |
2 files changed, 7 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 288c8cd9088..b9cf544b27b 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,3 +1,8 @@ | |||
| 1 | 2005-09-30 Kenichi Handa <handa@m17n.org> | ||
| 2 | |||
| 3 | * ps-mule.el (ps-mule-show-warning): If a character is in | ||
| 4 | ps-print-translation-table, don't treat it as non-printable. | ||
| 5 | |||
| 1 | 2005-09-30 David Ponce <david@dponce.com> | 6 | 2005-09-30 David Ponce <david@dponce.com> |
| 2 | 7 | ||
| 3 | * tree-widget.el (tree-widget-themes-load-path): New variable. | 8 | * tree-widget.el (tree-widget-themes-load-path): New variable. |
diff --git a/lisp/ps-mule.el b/lisp/ps-mule.el index 748cfd560b4..1be2eafba9d 100644 --- a/lisp/ps-mule.el +++ b/lisp/ps-mule.el | |||
| @@ -1415,7 +1415,8 @@ FONTTAG should be a string \"/h0\" or \"/h1\"." | |||
| 1415 | (goto-char from) | 1415 | (goto-char from) |
| 1416 | (while (and (<= (length char-pos-list) max-unprintable-chars) | 1416 | (while (and (<= (length char-pos-list) max-unprintable-chars) |
| 1417 | (re-search-forward "\\cu" to t)) | 1417 | (re-search-forward "\\cu" to t)) |
| 1418 | (push (cons (preceding-char) (1- (point))) char-pos-list)))) | 1418 | (or (aref ps-print-translation-table (preceding-char)) |
| 1419 | (push (cons (preceding-char) (1- (point))) char-pos-list))))) | ||
| 1419 | (with-output-to-temp-buffer "*Warning*" | 1420 | (with-output-to-temp-buffer "*Warning*" |
| 1420 | (with-current-buffer standard-output | 1421 | (with-current-buffer standard-output |
| 1421 | (when char-pos-list | 1422 | (when char-pos-list |