TakeV/spacemacs
1
0
Fork 0
Code Issues Pull requests Packages Projects Releases Wiki Activity

rainbow-identifiers: do not overwrite theme values

Browse source
This commit is contained in:
ksjogo 2016-06-08 15:18:04 +02:00 committed by syl20bnr
parent 2b44ce33a2
commit dd5836d948
1 changed files with 9 additions and 6 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

15
layers/+themes/colors/funcs.el
View file

@ -21,12 +21,15 @@
"Tweak color themes by adjusting rainbow-identifiers." "Tweak color themes by adjusting rainbow-identifiers."
(interactive) (interactive)
;; tweak the saturation and lightness of identifier colors ;; tweak the saturation and lightness of identifier colors
(let ((sat&light (assq theme colors-theme-identifiers-sat&light))) (when (not (assq theme (get 'rainbow-identifiers-cie-l*a*b*-saturation
(if sat&light 'theme-value)))
(setq rainbow-identifiers-cie-l*a*b*-saturation (cadr sat&light) (let ((sat&light (assq theme colors-theme-identifiers-sat&light)))
rainbow-identifiers-cie-l*a*b*-lightness (caddr sat&light)) (if sat&light
(setq rainbow-identifiers-cie-l*a*b*-saturation 80 (setq rainbow-identifiers-cie-l*a*b*-saturation (cadr sat&light)
rainbow-identifiers-cie-l*a*b*-lightness 45)))) rainbow-identifiers-cie-l*a*b*-lightness (caddr sat&light))
;; default
(setq rainbow-identifiers-cie-l*a*b*-saturation 80
rainbow-identifiers-cie-l*a*b*-lightness 45)))))
(defun colors//change-color-mini-mode-doc (component) (defun colors//change-color-mini-mode-doc (component)
"Display a short documentation in the mini buffer." "Display a short documentation in the mini buffer."