diff options
Diffstat (limited to 'lisp/disp-table.el')
| -rw-r--r-- | lisp/disp-table.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/disp-table.el b/lisp/disp-table.el index 6a8fe08ca20..174b5d27211 100644 --- a/lisp/disp-table.el +++ b/lisp/disp-table.el @@ -159,7 +159,7 @@ X frame." (defun standard-display-underline (c uc) "Display character C as character UC plus underlining." (aset standard-display-table c - (vector + (vector (if window-system (logior uc (lsh (face-id 'underline) 19)) (create-glyph (concat "\e[4m" (char-to-string uc) "\e[m")))))) |