Fix display of warnings on w32 console
* lisp/emacs-lisp/warnings.el (warnings-suppress): Use alternative symbol for TTY frames on MS-Windows.
This commit is contained in:
parent
bd094207c7
commit
09e9d7c749
1 changed files with 6 additions and 2 deletions
|
@ -204,8 +204,12 @@ SUPPRESS-LIST is the list of kinds of warnings to suppress."
|
||||||
some-match))
|
some-match))
|
||||||
|
|
||||||
(define-icon warnings-suppress button
|
(define-icon warnings-suppress button
|
||||||
'((emoji "⛔")
|
`((emoji "⛔")
|
||||||
(symbol " ■ ")
|
;; Many MS-Windows console fonts don't have good glyphs for U+25A0.
|
||||||
|
(symbol ,(if (and (eq system-type 'windows-nt)
|
||||||
|
(null window-system))
|
||||||
|
" » "
|
||||||
|
" ■ "))
|
||||||
(text " stop "))
|
(text " stop "))
|
||||||
"Suppress warnings."
|
"Suppress warnings."
|
||||||
:version "29.1"
|
:version "29.1"
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue