diff options
| author | Juri Linkov <juri@jurta.org> | 2013-01-09 01:50:40 +0200 |
|---|---|---|
| committer | Juri Linkov <juri@jurta.org> | 2013-01-09 01:50:40 +0200 |
| commit | 073ca75ba32d3b14aace7ad51c85f83be09376bd (patch) | |
| tree | 2e39f88ccbef802d194aad2fc6df2eb67ed184c3 /src/xfaces.c | |
| parent | 4bdc352611db6d7e9a11e75693e94dce61377d2e (diff) | |
| download | emacs-073ca75ba32d3b14aace7ad51c85f83be09376bd.tar.gz | |
* lisp/textmodes/flyspell.el (flyspell-incorrect, flyspell-duplicate):
* lisp/progmodes/flymake.el (flymake-errline, flymake-warnline):
Use underline style wave on terminals that support it.
* src/xfaces.c (tty_supports_face_attributes_p): Return 0 for the case
of (supports :underline (:style wave)).
Fixes: debbugs:13000
Diffstat (limited to 'src/xfaces.c')
| -rw-r--r-- | src/xfaces.c | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/src/xfaces.c b/src/xfaces.c index ed2895c014c..43535b9ea0c 100644 --- a/src/xfaces.c +++ b/src/xfaces.c @@ -4877,6 +4877,8 @@ tty_supports_face_attributes_p (struct frame *f, { if (STRINGP (val)) return 0; /* ttys can't use colored underlines */ + else if (EQ (CAR_SAFE (val), QCstyle) && EQ (CAR_SAFE (CDR_SAFE (val)), Qwave)) + return 0; /* ttys can't use wave underlines */ else if (face_attr_equal_p (val, def_attrs[LFACE_UNDERLINE_INDEX])) return 0; /* same as default */ else |