From 744bcf112775b9870982eb964091bff49531b505 Mon Sep 17 00:00:00 2001 From: Eli Zaretskii Date: Thu, 25 May 2000 16:54:17 +0000 Subject: [PATCH] (standard-display-g1, standard-display-graphic): Only refuse to use string glyphs on X and MS-Windows. --- lisp/disp-table.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lisp/disp-table.el b/lisp/disp-table.el index 7732956be91..b90f3277027 100644 --- a/lisp/disp-table.el +++ b/lisp/disp-table.el @@ -139,7 +139,7 @@ Valid symbols are `truncation', `wrap', `escape', `control', "Display character C as character SC in the g1 character set. This function assumes that your terminal uses the SO/SI characters; it is meaningless for an X frame." - (if window-system + (if (memq window-system '(x w32)) (error "Cannot use string glyphs in a windowing system")) (aset standard-display-table c (vector (create-glyph (concat "\016" (char-to-string sc) "\017"))))) @@ -149,7 +149,7 @@ it is meaningless for an X frame." "Display character C as character GC in graphics character set. This function assumes VT100-compatible escapes; it is meaningless for an X frame." - (if window-system + (if (memq window-system '(x w32)) (error "Cannot use string glyphs in a windowing system")) (aset standard-display-table c (vector (create-glyph (concat "\e(0" (char-to-string gc) "\e(B"))))) -- 2.39.5