From 888d644f0ba53ba4f4160dc0bdfda384936ded58 Mon Sep 17 00:00:00 2001 From: Katsumi Yamaoka Date: Tue, 29 Sep 2015 02:01:50 +0000 Subject: [PATCH] * net/shr.el (shr-colorize-region): Don't do it on a system not supporting 256 above colors (bug#21557). --- 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 fb450e8a95..ebc8ab3327 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 (or fg bg) + (when (and (or fg bg) (>= (display-color-cells) 256)) (let ((new-colors (shr-color-check fg bg))) (when new-colors (when fg -- 2.39.2