68 lines
1.9 KiB
EmacsLisp
68 lines
1.9 KiB
EmacsLisp
|
;;; config.el --- Theming Layer configuration File for Spacemacs
|
||
|
;;
|
||
|
;; Copyright (c) 2012-2014 Sylvain Benner
|
||
|
;; Copyright (c) 2014-2015 Sylvain Benner & Contributors
|
||
|
;;
|
||
|
;; Author: Sylvain Benner <sylvain.benner@gmail.com>
|
||
|
;; URL: https://github.com/syl20bnr/spacemacs
|
||
|
;;
|
||
|
;; This file is not part of GNU Emacs.
|
||
|
;;
|
||
|
;;; License: GPLv3
|
||
|
|
||
|
(defvar theming-modifications '()
|
||
|
"An alist of theme modifications. Each element should
|
||
|
be on the form (THEME . SPEC), where THEME is a symbol
|
||
|
representing a theme, and SPEC is an alist mapping faces
|
||
|
to face specs (see `defface').")
|
||
|
|
||
|
(defvar theming-headings-inherit-from-default '()
|
||
|
"A list of themes where all headings should inherit
|
||
|
from the default face, or the symbol `all'.")
|
||
|
|
||
|
(defvar theming-headings-same-size '()
|
||
|
"A list of themes where all headings should have the
|
||
|
same size, or the symbol `all'.")
|
||
|
|
||
|
(defvar theming-headings-bold '()
|
||
|
"A list of themes where all headings should be bold,
|
||
|
or the symbol `all'.")
|
||
|
|
||
|
(defvar spacemacs--theming-modified-faces '())
|
||
|
|
||
|
(defvar spacemacs--theming-header-faces
|
||
|
'(font-latex-sectioning-0-face
|
||
|
font-latex-sectioning-1-face
|
||
|
font-latex-sectioning-2-face
|
||
|
font-latex-sectioning-3-face
|
||
|
font-latex-sectioning-4-face
|
||
|
font-latex-sectioning-5-face
|
||
|
font-latex-slide-title-face
|
||
|
info-title-1
|
||
|
info-title-2
|
||
|
info-title-3
|
||
|
info-title-4
|
||
|
markdown-header-face
|
||
|
markdown-header-face-1
|
||
|
markdown-header-face-2
|
||
|
markdown-header-face-3
|
||
|
markdown-header-face-4
|
||
|
markdown-header-face-5
|
||
|
markdown-header-face-6
|
||
|
org-document-title
|
||
|
org-level-1
|
||
|
org-level-2
|
||
|
org-level-3
|
||
|
org-level-4
|
||
|
org-level-5
|
||
|
org-level-6
|
||
|
org-level-7
|
||
|
org-level-8)
|
||
|
"List of header faces.")
|
||
|
|
||
|
;; Apply theme customizations after any call to load-theme
|
||
|
(advice-add 'load-theme :after 'spacemacs//theming)
|
||
|
|
||
|
;; Apply the initial customizations now, because load-theme has already been called
|
||
|
(spacemacs//theming spacemacs--cur-theme)
|