changeset 21262:b3f406b3c297

(standard-display-underline): Shift face id by 19 bits.
author Karl Heuer <kwzh@gnu.org>
date Mon, 23 Mar 1998 00:12:14 +0000
parents edaef0e79ff0
children 4a9b37818fac
files lisp/disp-table.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/disp-table.el	Sat Mar 21 18:23:09 1998 +0000
+++ b/lisp/disp-table.el	Mon Mar 23 00:12:14 1998 +0000
@@ -161,7 +161,7 @@
   (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.