about summary refs log tree commit diff stats
diff options
context:
space:
mode:
-rw-r--r--emacs-prelude/personal/lisp/init-lsp.el2
-rw-r--r--emacs-prelude/personal/lisp/init-modeline.el1
-rw-r--r--emacs-prelude/personal/lisp/init-ui.el7
-rw-r--r--emacs-prelude/personal/personal.el4
4 files changed, 10 insertions, 4 deletions
diff --git a/emacs-prelude/personal/lisp/init-lsp.el b/emacs-prelude/personal/lisp/init-lsp.el
index 9f8f1cd..6803332 100644
--- a/emacs-prelude/personal/lisp/init-lsp.el
+++ b/emacs-prelude/personal/lisp/init-lsp.el
@@ -3,7 +3,7 @@
   :after key-chord
   :hook (clojure-mode . lsp)
   :config
-  (setq gc-cons-threshold (* 100 1024 1024)
+  (setq ;gc-cons-threshold (* 100 1024 1024)
         read-process-output-max (* 1024 1024)
         lsp-ui-doc-delay 1
         lsp-lens-enable nil
diff --git a/emacs-prelude/personal/lisp/init-modeline.el b/emacs-prelude/personal/lisp/init-modeline.el
index 4a727d7..b95eb80 100644
--- a/emacs-prelude/personal/lisp/init-modeline.el
+++ b/emacs-prelude/personal/lisp/init-modeline.el
@@ -31,4 +31,3 @@
      (not-checked . "○"))))
 
 (provide 'init-modeline)
-
diff --git a/emacs-prelude/personal/lisp/init-ui.el b/emacs-prelude/personal/lisp/init-ui.el
index 867fd5b..d3806f3 100644
--- a/emacs-prelude/personal/lisp/init-ui.el
+++ b/emacs-prelude/personal/lisp/init-ui.el
@@ -7,8 +7,11 @@
 (prelude-require-package 'solarized-theme)
 ;(load-theme 'solarized-dark t)
 (prelude-require-package 'modus-themes)
-(setq modus-themes-syntax '(alt-syntax green-strings yellow-comments)
-      modus-themes-paren-match '(bold intense underline))
+;(setq modus-themes-syntax '(alt-syntax green-strings yellow-comments)
+(setq modus-themes-syntax '(green-strings yellow-comments)
+      modus-themes-paren-match '(bold intense underline)
+      modus-themes-diffs '(desaturated)
+      modus-themes-lang-checkers '(text-also background))
 (load-theme 'modus-vivendi t)
 
 (setq whitespace-line-column 120)
diff --git a/emacs-prelude/personal/personal.el b/emacs-prelude/personal/personal.el
index dd09228..b5a1284 100644
--- a/emacs-prelude/personal/personal.el
+++ b/emacs-prelude/personal/personal.el
@@ -15,6 +15,10 @@
 (require 'init-mac)
 (require 'init-misc)
 
+(add-hook 'after-init-hook '(lambda ()
+                              (setq gc-cons-threshold (* 100 1024 1024)
+                                    gc-cons-percentage 0.1)))
+
 (global-unset-key (kbd "<left>"))
 (global-unset-key (kbd "<right>"))
 (global-unset-key (kbd "<up>"))