diff --git a/.emacs.d/init.el b/.emacs.d/init.el
index e8c7ca8..f651a98 100644
--- a/.emacs.d/init.el
+++ b/.emacs.d/init.el
@@ -225,20 +225,21 @@ value `italic'."
 (require 'cus-edit) ; custom faces
 (let
     ((fixedpt "Roboto Mono")
-     (  varpt "Roboto"))
+     (  varpt "Roboto")
+     ( accent "#89b4fa"))
   (add-to-list 'default-frame-alist (cons 'font fixedpt))
   (set-face-attributes
-   '((default :height 140)
-     (fixed-pitch :family fixedpt)
-     (variable-pitch :family varpt)
-     (fixed-pitch :family fixedpt :weight regular)
+   `((default :height 140)
+     (fixed-pitch :family ,fixedpt)
+     (variable-pitch :family ,varpt)
+     (fixed-pitch :family ,fixedpt :weight regular)
      (font-lock-comment-face :slant italic)
      (font-lock-keyword-face :slant italic)
-     (link :foreground "#89b4fa" :underline t)
+     (link :foreground ,accent :underline t)
      (help-key-binding
-      :family fixedpt
+      :family ,fixedpt
       :background "#181825"
-      :foreground "#89b4fa"
+      :foreground ,accent
       :box (:line-width (-1 . -1) :color "#11111b" :style nil))
      (widget-field
       :extend t
@@ -253,8 +254,8 @@ value `italic'."
                             :box (:line-width (1 . 1) :color "#11111b"))
      (info-xref :inherit link
                 :background "#181825"
-                :foreground "#cdd6f4")
-     (anzu-mode-line :foreground "#89b4fa"))))
+                :foreground ,accent)
+     (anzu-mode-line :foreground ,accent))))
 
 ;; custom
 (setq custom-file "~/.emacs.d/custom.el")