[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
bug#22611: [PATCH] Call ps-encode-header-string-function for plain strin
From: |
Łukasz Stelmach |
Subject: |
bug#22611: [PATCH] Call ps-encode-header-string-function for plain strings too |
Date: |
Tue, 9 Feb 2016 22:07:51 +0100 |
The function needs to be called for plain strings too to ensure
the BitmapDict contains required characters and Unicode characters
in the headers are printed properly.
---
lisp/ps-print.el | 6 +++++-
1 file changed, 5 insertions(+), 1 deletion(-)
diff --git a/lisp/ps-print.el b/lisp/ps-print.el
index 7333709..999398e 100644
--- a/lisp/ps-print.el
+++ b/lisp/ps-print.el
@@ -4761,7 +4761,11 @@ page-height == ((floor print-height ((th + ls) * zh)) *
((th + ls) * zh)) - th
;; Literal strings should be output as is -- the string must contain its own
;; PS string delimiters, '(' and ')', if necessary.
((stringp content)
- (ps-output content))
+ (if (functionp ps-encode-header-string-function)
+ (dolist (l (funcall ps-encode-header-string-function
+ content fonttag))
+ (ps-output l))
+ (ps-output content)))
;; Functions are called -- they should return strings; they will be inserted
;; as strings and the PS string delimiters added.
--
2.4.6