Mercurial > emacs
changeset 15485:d3b17e7049bf
(font-lock-make-faces): Set threshold for "light color"
at .6 of the total for white.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Sat, 22 Jun 1996 16:51:43 +0000 |
| parents | e3f8bfd1bb1f |
| children | 8c2363919ae0 |
| files | lisp/font-lock.el |
| diffstat | 1 files changed, 1 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/font-lock.el Sat Jun 22 04:50:32 1996 +0000 +++ b/lisp/font-lock.el Sat Jun 22 16:51:43 1996 +0000 @@ -1181,7 +1181,7 @@ 'dark)) ((< (apply '+ (x-color-values (cdr (assq 'background-color params)))) - (/ (apply '+ (x-color-values "white")) 3)) + (* (apply '+ (x-color-values "white")) .6)) 'dark) (t 'light))))) (if (null font-lock-face-attributes)