   :group 'danylo)
 
 (defface danylo/face-section
-  `((t (:foreground "white"
-		     :background ,danylo/red
-		     :height ,danylo/section-height
-		     :inherit default)))
+  `((t (:foreground ,danylo/white
+		    :background ,danylo/red
+		    :height ,danylo/section-height
+		    :inherit default)))
   "Face for text section."
   :group 'danylo)
 
 (defface danylo/face-subsection
-  `((t (:foreground "white"
-		     :background ,danylo/orange
-		     :height ,danylo/subsection-height
-		     :inherit default)))
+  `((t (:foreground ,danylo/white
+		    :background ,danylo/orange
+		    :height ,danylo/subsection-height
+		    :inherit default)))
   "Face for text subsection."
   :group 'danylo)
 
 (defface danylo/face-subsubsection
-  `((t (:foreground "white"
-		     :background ,danylo/blue
-		     :height ,danylo/subsubsection-height
-		     :inherit default)))
+  `((t (:foreground ,danylo/white
+		    :background ,danylo/blue
+		    :height ,danylo/subsubsection-height
+		    :inherit default)))
   "Face for text subsubsection."
   :group 'danylo)
 
 (defface danylo/face-deepsection
-  `((t (:foreground "white"
-		     :background ,danylo/faded-blue
-		     :inherit default)))
+  `((t (:foreground ,danylo/white
+		    :background ,danylo/faded-blue
+		    :inherit default)))
   "Face for text sections at lower levels than subsubsection."
   :group 'danylo)
 
 (defface danylo/latex-boolean
-  `((t (:foreground "white"
+  `((t (:foreground ,danylo/white
 		    :background ,danylo/red
 		    :inherit default)))
   "Face for boolean variables like \iffalse and \fi."

                   ":%" col-cols (if zero-based "c" "C")
		   col-pad)))))

  (add-to-list 'telephone-line-faces
	       '(yellow . (danylo/telephone-yellow
			   . telephone-line-accent-inactive)))

  (setq telephone-line-lhs
	'((yellow . (telephone-line-vc-segment))

;;;; Variables

(defcustom danylo/gc-cons-threshold `,(* 1024 1024 100)
  "Limit before garbage collection can happen automatically."
  :type 'integer
  :group 'danylo)

