Make diminish non-blocking

Further lowers the startup time

lisp/icejam-blocking.el

@@ -9,7 +9,6 @@
 ;;; Code:
 
 (use-package transient :ensure t)
-(use-package diminish :ensure t)
 (use-package company :ensure t)
 
 ;; Finally, wait for installation of these four packages.

lisp/icejam-diminish.el

@@ -6,27 +6,32 @@
 
 ;;; Commentary:
 
-;; diminish minor modes
+;; diminish minor modes to remove modeline litter.
 
 ;;; Code:
-(require 'icejam-blocking)
+(use-package diminish :ensure t :defer t :commands (diminish))
-;; (use-package diminish :ensure t)
 
-(with-eval-after-load 'diminish
+(defun icejam-diminish-modes ()
-  (with-eval-after-load 'flyspell (diminish 'flyspell-mode))
+  "Diminish selected modes."
-  (with-eval-after-load 'flycheck (diminish 'flycheck-mode))
+  (dolist (package-and-mode '((flyspell flyspell-mode)
-  (with-eval-after-load 'rainbow-mode (diminish 'rainbow-mode))
+                              (flycheck flycheck-mode)
-  (with-eval-after-load 'undo-tree (diminish 'undo-tree-mode))
+                              (rainbow-mode rainbow-mode)
-  (with-eval-after-load 'company (diminish 'company-mode))
+                              (undo-tree undo-tree-mode)
-  (with-eval-after-load 'which-key (diminish 'which-key-mode))
+                              (company company-mode)
-  (with-eval-after-load 'eldoc (diminish 'eldoc-mode))
+                              (which-key which-key-mode)
-  (with-eval-after-load 'yasnippet (diminish 'yas-minor-mode))
+                              (eldoc eldoc-mode)
-  (with-eval-after-load 'whitespace (diminish 'whitespace-mode))
+                              (yasnippet yas-minor-mode)
-  (with-eval-after-load 'autorevert (diminish 'auto-revert-mode))
+                              (whitespace whitespace-mode)
-  (with-eval-after-load 'ivy (diminish 'ivy-mode))
+                              (autorevert auto-revert-mode)
-  (with-eval-after-load 'company-box (diminish 'company-box-mode))
+                              (ivy ivy-mode)
-  (with-eval-after-load 'smerge-mode (diminish 'smerge-mode))
+                              (company-box company-box-mode)
-  (with-eval-after-load 'gcmh (diminish 'gcmh-mode)))
+                              (smerge-mode smerge-mode)
+                              (gcmh gcmh-mode)))
+    (let ((package (car package-and-mode))
+          (mode (car (last package-and-mode))))
+      (with-eval-after-load package (diminish mode)))))
+
+(add-hook 'elpaca-after-init-hook 'icejam-diminish-modes)
 
 (provide 'icejam-diminish)
 ;;; icejam-diminish.el ends here

lisp/icejam-fonts.el

@@ -3,14 +3,11 @@
 ;; Author: Maciej Szlosarczyk
 ;; Maintainer: Maciej Szlosarczyk
 ;; Version: 0.1-snapshot
-
 ;;; Commentary:
 
 ;; Set font stuff
 
 ;;; Code:
-(use-package dash :ensure t :defer t)
-
 ;; (defconst icejam-font "Monoid"
 ;; (defconst icejam-font "Fira Mono"
 ;; (defconst icejam-font "Fira Code"
@@ -26,11 +23,14 @@
 ;; (defconst icejam-font "Berkeley Mono Trial"
 ;; (defconst icejam-font "Inconsolata"
 ;; (defconst icejam-font "Victor Mono Medium" "Default font.")
-
 ;; (defconst icejam-font "Iosevka Term" "Default font.")
+
 (defconst icejam-font-family "Iosevka Comfy Motion" "Default font.")
 (defconst icejam-markdown-font-family "Iosevka Term" "Font used to render code blocks in markdown.")
 
+;; Require dash functions to be included:
+(declare-function -> "dash.el")
+
 (defconst icejam-font-height 14
   "Default height of then font.
 It is used to calculated the height in relation to the screen

lisp/langs/icejam-lang-elisp.el

@@ -5,6 +5,9 @@
 (require 'icejam-prog-mode)
 (require 'icejam-transient)
 
+;; Dash is a package that creates terse and more natural to me functions to
+;; do basic things in Elisp.
+(use-package dash :ensure t :defer t)
 (use-package lispy :ensure t :defer t)
 (use-package aggressive-indent :ensure t :defer t)
 
@@ -32,6 +35,7 @@
   (icejam-set-indent 2) ;; Default indentation of 2 characters
   (column-enforce-n 80)
 
+  (dash-fontify-mode t)    ;; Fontify dash variables
   (lispy-mode t)           ;; Pseudomodal editing for lisp code
   (aggressive-indent-mode) ;; Indent lisp automatically