(ps-generate-postscript-with-faces): If the face specified by the overlay's

`face' property is a string, assume it's a string name and intern it to get
the face symbol.

2 files changed, 11 insertions, 1 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index aae590defca..1d87af4666f 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,9 @@
+2008-04-02  Eli Zaretskii  <eliz@gnu.org>
+
+        * ps-print.el (ps-generate-postscript-with-faces): If the face
+        specified by the overlay's `face' property is a string, assume
+        it's a string name and intern it to get the face symbol.
+
 2008-04-01  Chong Yidong  <cyd@stupidchicken.com>
 
         * find-dired.el (find-dired-filter): Fix last patch to handle
diff --git a/lisp/ps-print.el b/lisp/ps-print.el
index 4ee58a8ce29..73fa3bb2a25 100644
--- a/lisp/ps-print.el
+++ b/lisp/ps-print.el
@@ -6676,7 +6676,11 @@ If FACE is not a valid face name, use default face."
                               ((ps-e-overlay-get overlay 'face))
                               (t face)
                               ))))
-                (setq overlays (cdr overlays))))
+                (setq overlays (cdr overlays)))
+              ;; Ediff refinement overlays specify faces by name, as a
+              ;; string, not as symbols.
+              (if (stringp face)
+                  (setq face (intern face))))
             ;; Plot up to this record.
             (and before-string
                  (ps-plot-string before-string))