add option to use sRGB

This commit is contained in:
Hoàng Đức Hiếu 2011-08-01 01:34:10 +07:00
parent 26260c07e2
commit f2365b359e
1 changed files with 8 additions and 1 deletions

View File

@ -35,6 +35,11 @@ will use the 256 degraded color mode."
:type 'integer
:group 'solarized)
(defcustom solarized-srgb nil
"Use Generic RGB color when nil."
:type 'boolean
:group 'solarized)
;; FIXME: The Generic RGB colors will actually vary from device to device, but
;; hopefully these are closer to the intended colors than the sRGB values
;; that Emacs seems to dislike
@ -65,7 +70,9 @@ will use the 256 degraded color mode."
(let ((index (if window-system
(if solarized-degrade
3
2)
(if solarized-srgb
1
2))
(if (= solarized-termcolors 256)
3
4))))