From 789b52ab71c7fe2fb51033d2bdb634a619929a94 Mon Sep 17 00:00:00 2001
From: tar <xhaaix@gmail.com>
Date: Tue, 30 Sep 2025 18:44:39 +0200
Subject: [PATCH] remove exec-path-from-shell, try to optimize load time

---
 init.el             | 75 +++++++++++++++++++++++++++------------------
 profile-dotemacs.el |  2 +-
 2 files changed, 46 insertions(+), 31 deletions(-)

diff --git a/init.el b/init.el
index 158f82e..74e4339 100644
--- a/init.el
+++ b/init.el
@@ -1,3 +1,4 @@
+;; -*- lexical-binding: t; -*-
 (setq gc-cons-threshold (* 100 1000 1000))
 (add-hook 'after-init-hook #'(lambda ()
                                ;; restore after startup
@@ -68,31 +69,55 @@ Shows a message if no path is available."
      "b99e334a4019a2caa71e1d6445fc346c6f074a05fcbb989800ecbe54474ae1b0"
      default))
  '(initial-frame-alist '((fullscreen . maximized)))
- '(package-selected-packages nil))
+ '(package-selected-packages nil)
+ '(warning-suppress-log-types
+   '((files missing-lexbind-cookie
+            "~/.emacs.d/elpa/gruber-darker-theme-20231026.2031/gruber-darker-theme.el"))))
 
 (require 'package)
 (add-to-list 'package-archives '("melpa" . "https://melpa.org/packages/") t)
 (package-initialize)
 
-(use-package which-key
-  :ensure t
-  :config (which-key-mode))
-
-(use-package vertico
-  :ensure t
+(use-package dired
   :config
-  (add-hook 'rfn-eshadow-update-overlay-hook 'vertico-directory-tidy))
+  (put 'dired-find-alternate-file 'disabled nil)
+  (add-hook 'dired-mode-hook
+          (lambda ()
+            (define-key dired-mode-map (kbd "RET")
+              (lambda () (interactive) (find-alternate-file (dired-get-file-for-visit))))))
+  (setq delete-by-moving-to-trash t)
+  (setq dired-dwim-target t))
 
 (use-package marginalia
   :ensure t)
 
+(use-package vertico
+  :ensure t
+  :defer t
+  :config
+  (add-hook 'rfn-eshadow-update-overlay-hook 'vertico-directory-tidy))
+
+(use-package move-text
+  :ensure t
+  :defer t
+  :config
+  (global-set-key (kbd "<M-up>") 'move-text-up)
+  (global-set-key (kbd "<M-down>") 'move-text-down))
+
+(use-package which-key
+  :ensure t
+  :defer t
+  :config (which-key-mode))
+
 (require 'treesit)
 
 (use-package docker-compose-mode
-  :ensure t)
+  :ensure t
+  :defer t)
 
 (use-package zig-mode
-  :ensure t)
+  :ensure t
+  :defer t)
 
 (use-package dockerfile-mode
   :ensure t
@@ -105,16 +130,6 @@ Shows a message if no path is available."
   :defer t
   :hook (prog-mode . flycheck-mode))
 
-(use-package dired
-  :config
-  (put 'dired-find-alternate-file 'disabled nil)
-  (add-hook 'dired-mode-hook
-          (lambda ()
-            (define-key dired-mode-map (kbd "RET")
-              (lambda () (interactive) (find-alternate-file (dired-get-file-for-visit))))))
-  (setq delete-by-moving-to-trash t)
-  (setq dired-dwim-target t))
-
 (vertico-mode 1)
 
 (marginalia-mode 1)
@@ -129,7 +144,7 @@ Shows a message if no path is available."
 ;; EnvyCodeR Nerd Font
 ;; Binchotan_Sharp
 ;; Ubuntu Mono
-(set-face-attribute 'default nil :font "Binchotan_Sharp" :height 120)
+(set-face-attribute 'default nil :font "Binchotan_Sharp" :height 140)
 ;;(set-face-attribute 'default nil :height 110)
 
 ;;(set-fontset-font t nil (font-spec :size 20 :name "VictorMono Nerd Font Mono"))
@@ -137,6 +152,9 @@ Shows a message if no path is available."
 
 ;;(setq x-antialiasing-factor nil)
 
+;; Example how to add a new dir to PATH
+;; (add-to-list 'exec-path "/home/tar/.local/bin")
+
 (set-default-coding-systems 'utf-8)
 
 (setq ring-bell-function 'ignore)
@@ -177,14 +195,8 @@ Shows a message if no path is available."
 
 ;; (setq elpy-rpc-virtualenv-path 'current)
 
-(use-package exec-path-from-shell
-  :ensure t
-  :config
-  (when (memq window-system '(mac ns x))
-    (exec-path-from-shell-initialize)))
-
-(add-hook 'python-mode-hook
-          (lambda () (setq gud-pdb-command-name "python3 -m pdb")))
+;; (add-hook 'python-mode-hook
+;;           (lambda () (setq gud-pdb-command-name "python3 -m pdb")))
 
 (use-package yasnippet
   :hook (prog-mode . yas-minor-mode)
@@ -194,7 +206,8 @@ Shows a message if no path is available."
 
 
 (use-package meson-mode
-  :ensure t)
+  :ensure t
+  :defer t)
 
 (use-package vala-mode
   :ensure t
@@ -416,11 +429,13 @@ ef-themes-variable-pitch-ui t)
 
 (use-package lsp-mode
   :ensure t
+  :defer t
   :config
   (setq lsp-signature-render-documentation nil))
 
 (use-package dap-mode
   :ensure t
+  :defer t
   ;;:custom (lsp-enable-dap-auto-configure nil)
   :commands dap-debug)
 
diff --git a/profile-dotemacs.el b/profile-dotemacs.el
index 9d7bdbb..157c527 100644
--- a/profile-dotemacs.el
+++ b/profile-dotemacs.el
@@ -1,4 +1,4 @@
-;;; profile-dotemacs.el --- Profile your Emacs init file
+;;; profile-dotemacs.el --- Profile your Emacs init file  -*- lexical-binding: t; -*-
 
 ;; Copyright (C) 2010, 2012  David Engster