use symbolic names for 'background' colors even in 256-color mode

2013-03-20 13:14:53 -04:00 · 2013-03-20 13:14:53 -04:00 · 0cc9c0102b
parent ec7dc87285
commit 0cc9c0102b
1 changed files with 3 additions and 1 deletions
--- a/solarized-definitions.el
+++ b/solarized-definitions.el
@ -85,7 +85,9 @@ the \"Gen RGB\" column in solarized-definitions.el to improve them further."
                           (case (display-color-cells)
                             (16 4)
                             (8  5)
-                             (otherwise 3)))))
+                             (otherwise (if (find name '(base03 base02 base2 base3))
+                                            4
+                                          3))))))
             (nth index (assoc name solarized-colors)))))
    (let ((base03      (find-color 'base03))
          (base02      (find-color 'base02))