From dba46b2b648938f18b0ee97b5d121dbeb7fa5dc0 Mon Sep 17 00:00:00 2001
From: Alan Pearce
Date: Tue, 28 Mar 2023 21:44:30 +0200
Subject: emacs: optimise startup time

---
 user/emacs/init.el | 17 ++++++++++++-----
 1 file changed, 12 insertions(+), 5 deletions(-)

(limited to 'user/emacs/init.el')

diff --git a/user/emacs/init.el b/user/emacs/init.el
index 5485a7a9..29d1840e 100644
--- a/user/emacs/init.el
+++ b/user/emacs/init.el
@@ -232,8 +232,11 @@ With two prefix arguments, write out the day and month name."
 (use-package hydra
   :defer 2)
 
-(custom-set-variables '(recentf-auto-cleanup 1800))
-(recentf-mode +1)
+(use-package recentf
+  :defer 1
+  :custom (recentf-auto-cleanup 1800)
+  :config (recentf-mode +1))
+
 (use-package savehist
   :init (savehist-mode +1)
   :config (progn
@@ -471,7 +474,7 @@ _p_rev       _u_pper              _=_: upper/lower       _r_esolve
   :config (progn
             (setq company-idle-delay 0.2
                   company-tooltip-align-annotations t
-                  company-show-numbers t
+                  company-show-quick-access t
                   company-dabbrev-downcase nil
                   company-dabbrev-ignore-case nil
                   company-begin-commands '(self-insert-command)
@@ -493,6 +496,7 @@ _p_rev       _u_pper              _=_: upper/lower       _r_esolve
             "<backtab>" #'company-select-previous))
 
 (use-package all-the-icons
+  :defer t
   :config (setq all-the-icons-color-icons nil))
 
 (defmacro company-set-secondary-backend-for-mode (mode backend)
@@ -552,7 +556,7 @@ _p_rev       _u_pper              _=_: upper/lower       _r_esolve
 ;;;; Auto-reloading
 
 (use-package autorevert
-  :defer 10
+  :defer 1
   :config (progn
             (setq auto-revert-verbose nil
                   auto-revert-use-notify t)
@@ -774,8 +778,10 @@ _p_rev       _u_pper              _=_: upper/lower       _r_esolve
 (use-package racket-mode
   :ghook ('racket-mode-hook #'racket-xp-mode))
 
-(use-package clojure-mode)
+(use-package clojure-mode
+  :defer t)
 (use-package cider
+  :defer t
   :after clojure-mode)
 (use-package rainbow-delimiters
   :ghook ('clojure-mode-hook
@@ -901,6 +907,7 @@ _p_rev       _u_pper              _=_: upper/lower       _r_esolve
 ;;; Projects
 
 (use-package ripgrep
+  :defer 10
   :config (progn
             (setq ripgrep-arguments '("--hidden"))))
 
-- 
cgit 1.4.1