summaryrefslogtreecommitdiffhomepage
diff options
context:
space:
mode:
-rw-r--r--consult.org3
-rw-r--r--lib/themes/jao-light-theme.el13
-rw-r--r--lib/themes/jao-themes.el3
-rw-r--r--org.org2
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))
diff --git a/org.org b/org.org
index 75a7165..2f6d773 100644
--- a/org.org
+++ b/org.org
@@ -1,3 +1,5 @@
+#+title: Org (and related) mode configuration
+
* General configuration
#+BEGIN_SRC emacs-lisp
(use-package org