I think color-gray-p should return t for shades of gray, white, and
black, as per doc string.  But it does not work for black...

(color-gray-p "white")
t
(color-gray-p "black")
nil
(color-gray-p "gray0")
nil

Alex.