diff options
-rw-r--r-- | consult.org | 3 | ||||
-rw-r--r-- | lib/themes/jao-light-theme.el | 13 | ||||
-rw-r--r-- | lib/themes/jao-themes.el | 3 | ||||
-rw-r--r-- | org.org | 2 |
4 files changed, 12 insertions, 9 deletions
diff --git a/consult.org b/consult.org index f8fbdf5..a9193fd 100644 --- a/consult.org +++ b/consult.org @@ -2,8 +2,7 @@ * completion styles #+begin_src emacs-lisp - (setq completion-styles '(substring flex initials)) - ;; '(basic partial-completion emacs22) + (setq completion-styles '(basic partial-completion emacs22)) #+end_src * prescient #+begin_src emacs-lisp diff --git a/lib/themes/jao-light-theme.el b/lib/themes/jao-light-theme.el index e339aa0..469ad39 100644 --- a/lib/themes/jao-light-theme.el +++ b/lib/themes/jao-light-theme.el @@ -56,7 +56,7 @@ (tab-unsel ((~ mode-line-inactive))) (comment ((c greyish) it)) (keyword ((c dark-blue-2) nbf)) - (type ((c blueish) nbf)) + (type ((c nil) nbf)) (function ((c green nil) nbf)) (variable-name ((c "black"))) (constant ((c 23))) @@ -67,9 +67,9 @@ (gnus-mail ((c "black"))) (gnus-news ((c "black"))) (outline ((c "black") nbf)) - (outline-1 ((c dark-blue-1) it bf)) - (outline-2 ((c functions) it nbf)) - (outline-3 ((c link) it nbf)) + (outline-1 (~ bold) ((c dark-blue-1) nit)) + (outline-2 ((c functions) nit nbf)) + (outline-3 ((c link) nit nbf)) (outline-4 ((c nil) it nbf)) (outline-5 ((c nil))) (f00 ((c slate))) @@ -85,7 +85,7 @@ (mode-line-buffer-id (~ mode-line) nit) (mode-line-emphasis it) (mode-line-highlight (c green nil))) - (:x-faces (bold bf) + (:x-faces (bold :family "Source Code Pro Semibold" :height 100) (compilation-info (c "#223142" nil) nbf) (company-scrollbar-bg (c nil "grey95")) (company-scrollbar-fg (c nil "grey90")) @@ -103,6 +103,7 @@ (gnus-cite-4 (c "slate gray")) (gnus-summary-selected (c green) nbf) (gnus-summary-cancelled (c "sienna3") st) + (haskell-type-face (p f12)) (header-line (c nil "#efebe7")) (ivy-highlight-face (c nil pale-yellow)) (ivy-current-match (c nil pale-yellow)) @@ -123,7 +124,7 @@ (vertical-border (c "grey70" nil)) (warning (c "burlywood4")) (w3m-image (c slate "ghost white")) - (w3m-bold (c slate) nbf :height 100))) + (w3m-bold (~ bold)))) ;; (enable-theme 'jao-light) diff --git a/lib/themes/jao-themes.el b/lib/themes/jao-themes.el index c340b84..e9cb6e0 100644 --- a/lib/themes/jao-themes.el +++ b/lib/themes/jao-themes.el @@ -675,7 +675,8 @@ (google-translate-translation-face bf) (gui-button-face (~ button)) (gui-element (~ gui-button-face))) - `((header-line (~ mode-line-inactive)) + `((haskell-constructor-face (~ haskell-type-face)) + (header-line (~ mode-line-inactive)) (help-argument-name) (helm-selection (p hilite)) (helm-separator (p dimm)) @@ -1,3 +1,5 @@ +#+title: Org (and related) mode configuration + * General configuration #+BEGIN_SRC emacs-lisp (use-package org |