1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-12-14 09:39:42 +00:00

Fix shr and CSS 4 color maps

* lisp/net/shr-color.el (shr-color-html-colors-alist): Fix typos.
Add RebeccaPurple.
* lisp/textmodes/css-mode.el (css--color-map): Add fuchsia-magenta
and aqua-cyan aliases.
* test/lisp/textmodes/css-mode-tests.el (css-test-property-values):
Bump color count.
This commit is contained in:
Basil L. Contovounesios 2018-02-07 02:49:08 +00:00 committed by Simen Heggestøyl
parent 5fe81923e5
commit e209034536
3 changed files with 6 additions and 3 deletions

View File

@ -137,7 +137,7 @@ absolute value without any unit."
("MediumAquaMarine" . "#66CDAA")
("MediumBlue" . "#0000CD")
("MediumOrchid" . "#BA55D3")
("MediumPurple" . "#9370D8")
("MediumPurple" . "#9370DB")
("MediumSeaGreen" . "#3CB371")
("MediumSlateBlue" . "#7B68EE")
("MediumSpringGreen" . "#00FA9A")
@ -158,7 +158,7 @@ absolute value without any unit."
("PaleGoldenRod" . "#EEE8AA")
("PaleGreen" . "#98FB98")
("PaleTurquoise" . "#AFEEEE")
("PaleVioletRed" . "#D87093")
("PaleVioletRed" . "#DB7093")
("PapayaWhip" . "#FFEFD5")
("PeachPuff" . "#FFDAB9")
("Peru" . "#CD853F")
@ -166,6 +166,7 @@ absolute value without any unit."
("Plum" . "#DDA0DD")
("PowderBlue" . "#B0E0E6")
("Purple" . "#800080")
("RebeccaPurple" . "#663399")
("Red" . "#FF0000")
("RosyBrown" . "#BC8F8F")
("RoyalBlue" . "#4169E1")

View File

@ -498,6 +498,7 @@ further value candidates, since that list would be infinite.")
("red" . "#ff0000")
("purple" . "#800080")
("fuchsia" . "#ff00ff")
("magenta" . "#ff00ff")
("green" . "#008000")
("lime" . "#00ff00")
("olive" . "#808000")
@ -506,6 +507,7 @@ further value candidates, since that list would be infinite.")
("blue" . "#0000ff")
("teal" . "#008080")
("aqua" . "#00ffff")
("cyan" . "#00ffff")
("orange" . "#ffa500")
("aliceblue" . "#f0f8ff")
("antiquewhite" . "#faebd7")

View File

@ -58,7 +58,7 @@
;; Check that the `color' property doesn't cause infinite recursion
;; because it refers to the value class of the same name.
(should (= (length (css--property-values "color")) 152)))
(should (= (length (css--property-values "color")) 154)))
(ert-deftest css-test-property-value-cache ()
"Test that `css--property-value-cache' is in use."