Mercurial > emacs
comparison lisp/textmodes/ispell.el @ 30546:26e5d26a83ed
(ispell-highlight-spelling-error): Use
display-color-p, if fboundp, instead of window-system.
| author | Eli Zaretskii <eliz@gnu.org> |
|---|---|
| date | Tue, 01 Aug 2000 06:24:28 +0000 |
| parents | 15df28a6f99f |
| children | a8130a547f56 |
comparison
equal
deleted
inserted
replaced
| 30545:4fc9847efaf6 | 30546:26e5d26a83ed |
|---|---|
| 2007 (defun ispell-highlight-spelling-error (start end &optional highlight refresh) | 2007 (defun ispell-highlight-spelling-error (start end &optional highlight refresh) |
| 2008 (cond | 2008 (cond |
| 2009 (xemacsp | 2009 (xemacsp |
| 2010 (ispell-highlight-spelling-error-xemacs start end highlight)) | 2010 (ispell-highlight-spelling-error-xemacs start end highlight)) |
| 2011 ((and (not version18p) | 2011 ((and (not version18p) |
| 2012 (featurep 'faces) window-system) | 2012 (featurep 'faces) |
| 2013 (or (and (fboundp 'display-color-p) (display-color-p)) | |
| 2014 window-system)) | |
| 2013 (ispell-highlight-spelling-error-overlay start end highlight)) | 2015 (ispell-highlight-spelling-error-overlay start end highlight)) |
| 2014 (t (ispell-highlight-spelling-error-generic start end highlight refresh)))) | 2016 (t (ispell-highlight-spelling-error-generic start end highlight refresh)))) |
| 2015 | 2017 |
| 2016 | 2018 |
| 2017 (defun ispell-overlay-window (height) | 2019 (defun ispell-overlay-window (height) |