From 8b95ee49bc1d632a34230b367be53a97060ebe7e Mon Sep 17 00:00:00 2001 From: Katsumi Yamaoka Date: Tue, 29 Sep 2015 06:30:48 +0000 Subject: [PATCH] * net/shr.el (shr-colorize-region): Allow 88-color tty to use colors. Suggested by Eli Zaretskii. --- lisp/net/shr.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/net/shr.el b/lisp/net/shr.el index ebc8ab3327f..60203f581ec 100644 --- a/lisp/net/shr.el +++ b/lisp/net/shr.el @@ -1042,7 +1042,7 @@ ones, in case fg and bg are nil." (shr-color-visible bg fg))))))) (defun shr-colorize-region (start end fg &optional bg) - (when (and (or fg bg) (>= (display-color-cells) 256)) + (when (and (or fg bg) (>= (display-color-cells) 88)) (let ((new-colors (shr-color-check fg bg))) (when new-colors (when fg -- 2.39.2