Fix typo

Signed-off-by: Julien Danjou <julien@danjou.info>

diff --git a/lisp/shr.el b/lisp/shr.el
index 8ee1e99..57e8130 100644 (file)
--- a/lisp/shr.el
+++ b/lisp/shr.el
@@ -849,7 +849,7 @@ Apply color check via `shr-color-check'."
   (let* ((start (point))
          (color (cdr (assq :color cont)))
          (shr-stylesheet (if color
-                             `((color . ,fgcolor) ,@shr-stylesheet)
+                             `((color . ,color) ,@shr-stylesheet)
                            shr-stylesheet)))
     (shr-generic cont)))