init.el

@@ -26,6 +26,19 @@ declarations for color schemes."
   (setq window-divider-default-places t)
   ;; (setq right-divider-width 5)
   (setq ring-bell-function 'ignore)
+  (unless (not (display-graphic-p))
+    (set-face-attribute 'fixed-pitch nil
+			:family "MesloLGS Nerd Font")
+    (set-face-attribute 'default nil
+			:family "MesloLGS Nerd Font")
+    (set-face-attribute 'variable-pitch nil
+			:inherit 'default
+			:family "sans serif"
+			:height (/ 1.5 1.3))
+    (add-to-list 'initial-frame-alist '(alpha-background . 65))
+    (add-to-list 'default-frame-alist '(alpha-background . 65))
+    (add-to-list 'default-frame-alist '(cursor-color . "white"))
+    (add-to-list 'default-frame-alist '(fullscreen . maximized)))
   ;; see also https://emacs.stackexchange.com/questions/7228/nice-tty-window-borders-in-24-4
   (let ((display-table (or standard-display-table (make-display-table))))
     (set-display-table-slot display-table 'vertical-border (make-glyph-code ?│))
@@ -52,20 +65,7 @@ console."
 	 (font-height (/ resy 8))) ; gonna be different on diff machines 💀
     (set-face-attribute 'fixed-pitch nil :height font-height)
     (set-face-attribute 'default nil :height font-height)
-    (set-face-attribute 'variable-pitch nil :height (+ font-height 10)))
+    (set-face-attribute 'variable-pitch nil :height (+ font-height 10))))
-  (unless (not (display-graphic-p))
-    (set-face-attribute 'fixed-pitch nil
-			:family "MesloLGS Nerd Font")
-    (set-face-attribute 'default nil
-			:family "MesloLGS Nerd Font")
-    (set-face-attribute 'variable-pitch nil
-			:inherit 'default
-			:family "sans serif"
-			:height (/ 1.5 1.3))
-    (add-to-list 'initial-frame-alist '(alpha-background . 65))
-    (add-to-list 'default-frame-alist '(alpha-background . 65))
-    (add-to-list 'default-frame-alist '(cursor-color . "white"))
-    (add-to-list 'default-frame-alist '(fullscreen . maximized))))
 (defun turn-off-line-numbers ()
   "A tiny wrapper around `display-line-numbers-mode' or `linum'.
 For use in hooks."
@@ -268,9 +268,8 @@ For instance:
   (eshell-hist-ignoredups t)
   (eshell-history-file-name (expand-file-name "zsh/histfile" "~/.local/share/"))
   (eshell-history-size nil)
+  (eshell-banner-message "")
   (eshell-expand-input-functions '(eshell-expand-history-references))
-  :init
-  (setq eshell-banner-message "")
   :config
   (add-to-list 'tramp-remote-path "/bedrock/bin" 'append)
   (add-to-list 'eshell-modules-list 'eshell-rebind)
@@ -523,10 +522,7 @@ If the current window occupies the whole frame, split it."
     (setq-local outline-regexp eshell-prompt-regexp))
   (add-hook 'eshell-mode-hook #'mir/esh-outline-setup))
 (use-package exec-path-from-shell
-  :defer 3
+  :hook (eshell-mode . exec-path-from-shell-initialize))
-  :config (exec-path-from-shell-initialize)
-  ;; :hook (eshell-mode . exec-path-from-shell-initialize)
-  )
 
 (use-package eat
   :ensure (eat :type git
@@ -1313,10 +1309,6 @@ Taken from https://howardism.org/Technical/Emacs/eshell-why.html"
   :defer t
   :commands 'yeetube-search)
 
-(use-package super-hint
-  :ensure ( :type git :host github
-	    :repo "eval-exec/super-hint.el"))
-
 					;(require 'mir-packages)
 ;; (setq esup-depth 0)
 
@@ -1328,4 +1320,3 @@ Taken from https://howardism.org/Technical/Emacs/eshell-why.html"
 (setq debug-on-error nil)
 
 ;;; init.el ends here
-(put 'list-timers 'disabled nil)