changeset 80427:b67aeea762f2

(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.
author Eli Zaretskii <eliz@gnu.org>
date Wed, 02 Apr 2008 17:51:01 +0000
parents 446857e94527
children 46573e7f783c
files lisp/ps-print.el
diffstat 1 files changed, 5 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- 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))