From c40096a04343f419a1773dc23e91638c1f3908b5 Mon Sep 17 00:00:00 2001 From: Karl Heuer Date: Mon, 23 Mar 1998 00:12:14 +0000 Subject: (standard-display-underline): Shift face id by 19 bits. --- lisp/disp-table.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'lisp') diff --git a/lisp/disp-table.el b/lisp/disp-table.el index 01a1fce17d..3ebc1c9e38 100644 --- a/lisp/disp-table.el +++ b/lisp/disp-table.el @@ -161,7 +161,7 @@ X frame." (aset standard-display-table c (vector (if window-system - (logior uc (lsh (face-id (internal-find-face 'underline)) 8)) + (logior uc (lsh (face-id (internal-find-face 'underline)) 19)) (create-glyph (concat "\e[4m" (char-to-string uc) "\e[m")))))) ;; Allocate a glyph code to display by sending STRING to the terminal. -- cgit v1.2.3