# HG changeset patch
# User Eli Zaretskii <eliz@gnu.org>
# Date 1207158661 0
# Node ID b67aeea762f2665b69ccc11fc73ed6a6f3e0ec9c
# Parent  446857e945276a8978ffa59e80616a1a748869c6
(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.

diff -r 446857e94527 -r b67aeea762f2 lisp/ps-print.el
--- a/lisp/ps-print.el	Wed Apr 02 00:55:27 2008 +0000
+++ b/lisp/ps-print.el	Wed Apr 02 17:51:01 2008 +0000
@@ -6676,7 +6676,11 @@
 			      ((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))