Use my mirror

early-init.el

@@ -42,7 +42,7 @@
       inhibit-startup-screen t
       inhibit-startup-echo-area-message user-login-name
       inhibit-default-init t
-      ;; initial-major-mode 'l-mode
+      initial-major-mode 'text-mode
       initial-scratch-message nil)
 
 ;; Faster to disable these here (before they've been initialized)

init.el

@@ -30,7 +30,7 @@
 
 (require 'init-bindings)
 (require 'init-dired)
-;; (require 'init-dashboard) ;; not working
+;; (require 'init-dashboard)
 (require 'init-window)
 (require 'init-shell)
 ;; (require 'init-treemacs) ;; not working
@@ -54,7 +54,6 @@
 
 (require 'init-org)
 (require 'init-tex)
-;; (require 'init-markdown)
 (require 'init-cc)
 (require 'init-python)
 (require 'init-haskell)

lisp/init-check.el

@@ -1,6 +1,7 @@
 ;; -*- lexical-binding: t; -*-
 
 (use-package flycheck
+  :diminish
   :hook (emacs-startup . global-flycheck-mode)
   :config
   (setq flycheck-emacs-lisp-load-path 'inherit)

lisp/init-dashboard.el

@@ -1,41 +1,49 @@
 ;; -*- lexical-binding: t; -*-
 
-(use-package dashboard
-  :init
-  (use-package doom-dashboard
-    :ensure (doom-dashboard :host github
-                            :repo "emacs-dashboard/doom-dashboard")
-    :demand t
-    ;; Movement keys like doom.
-    :bind
-    (:map dashboard-mode-map
-          ("<remap> <dashboard-previous-line>" . widget-backward)
-          ("<remap> <dashboard-next-line>" . widget-forward)
-          ("<remap> <previous-line>" . widget-backward)
-          ("<remap> <next-line>"  . widget-forward)
-          ("<remap> <right-char>" . widget-forward)
-          ("<remap> <left-char>"  . widget-backward))
-    :custom
-    (dashboard-banner-logo-title "E M A C S")
-    (dashboard-startup-banner
-     (concat doom-dashboard-banner-directory "bcc.txt")) ; Use banner you want
-    (dashboard-footer-icon
-     (nerd-icons-faicon "nf-fa-github_alt" :face 'success :height 1.5))
-    (dashboard-page-separator "\n")
-    (dashboard-startupify-list `(dashboard-insert-banner
-                                 dashboard-insert-banner-title
-                                 dashboard-insert-newline
-                                 dashboard-insert-items
-                                 ,(dashboard-insert-newline 2)
-                                 dashboard-insert-init-info
-                                 ,(dashboard-insert-newline 2)
-                                 doom-dashboard-insert-homepage-footer))
-    (dashboard-item-generators
-     '((recents   . doom-dashboard-insert-recents-shortmenu)
-       (bookmarks . doom-dashboard-insert-bookmark-shortmenu)
-       (projects  . doom-dashboard-insert-project-shortmenu)
-       (agenda    . doom-dashboard-insert-org-agenda-shortmenu)))
-    (dashboard-items '(projects agenda bookmarks recents)))
-  )
+(use-package dashboard :demand t)  
+
+(use-package doom-dashboard
+  ;; For Straight Users
+  :ensure (doom-dashboard :host github
+                          :repo "emacs-dashboard/doom-dashboard")
+  ;; Or for built-in package-vc
+  ;; :vc (:url "https://github.com/emacs-dashboard/doom-dashboard.git" :rev :newest)
+  ;; :after dashboard
+  :demand t
+  ;; :hook (elpaca-after-init . dashboard-setup-startup-hook)
+  ;; Movement keys like doom.
+  :bind
+  (:map dashboard-mode-map
+        ("<remap> <dashboard-previous-line>" . widget-backward)
+        ("<remap> <dashboard-next-line>" . widget-forward)
+        ("<remap> <previous-line>" . widget-backward)
+        ("<remap> <next-line>"  . widget-forward)
+        ("<remap> <right-char>" . widget-forward)
+        ("<remap> <left-char>"  . widget-backward))
+  :custom
+  (dashboard-banner-logo-title "E M A C S")
+  ;; (dashboard-startup-banner 
+  ;; (concat doom-dashboard-banner-directory "bcc.txt")) ; Use banner you want
+  ;; (dashboard-footer-icon 
+  ;; (nerd-icons-faicon "nf-fa-github_alt" :face 'success :height 1.5))
+  (dashboard-page-separator "\n")
+  (dashboard-startupify-list `(dashboard-insert-banner
+                               dashboard-insert-banner-title
+                               dashboard-insert-newline
+                               dashboard-insert-items
+                               ,(dashboard-insert-newline 2)
+                               dashboard-insert-init-info
+                               ,(dashboard-insert-newline 2)
+                               doom-dashboard-insert-homepage-footer))
+  (dashboard-item-generators
+   '((recents   . doom-dashboard-insert-recents-shortmenu)
+     (bookmarks . doom-dashboard-insert-bookmark-shortmenu)
+     (projects  . doom-dashboard-insert-project-shortmenu)
+     (agenda    . doom-dashboard-insert-org-agenda-shortmenu)))
+  ;; (dashboard-items '(projects agenda bookmarks recents)))
+  (dashboard-items '(projects bookmarks recents)))
+
+;; Why doom 
+
 
 (provide 'init-dashboard)

lisp/init-edit.el

@@ -20,9 +20,20 @@
   :custom
   (puni-confirm-when-delete-unbalanced-active-region nil)
   :bind (:map puni-mode-map
+              ("M-r" . puni-raise)
               ("M-s" . puni-splice)
+              ("M-S" . puni-split)
               ("DEL" . my-backspace)
               ("C-=" . puni-expand-region)
+              ("M-[" . puni-slurp-backward)
+              ("M-]" . puni-slurp-forward)
+              ("M-<left>" . puni-slurp-backward)
+              ("M-<right>" . puni-slurp-forward)
+              ("C-M-[" . puni-barf-backward)
+              ("C-M-]" . puni-barf-forward)
+              ("C-M-<left>" . puni-barf-backward)
+              ("C-M-<right>" . puni-barf-forward)
+              ([remap backward-kill-word] . puni-backward-kill-word)
               )
   :init
   (defun my-backspace ()

lisp/init-llm.el

@@ -5,7 +5,7 @@
   :bind (("C-c l s" . gptel-send)
 	       ("C-c l m" . gptel-menu))
   :config
-  (setq gptel-model 'gpt-5.2-codex)
+  (setq gptel-model 'gpt-5.2)
   (setq gptel-backend (gptel-make-gh-copilot "Copilot"))
   (setq gptel-default-mode #'org-mode)
   (setq gptel-display-buffer-action nil)  ; if user changes this, popup manager will bow out

lisp/init-lsp.el

@@ -1,9 +1,5 @@
 ;; -*- lexical-binding: t; -*-
 
-;; LSP booster
-
-
-
 (use-package lsp-mode
   :diminish
   :defines (lsp-diagnostics-disabled-modes lsp-clients-python-library-directories)

lisp/init-org.el

@@ -2,7 +2,7 @@
 
 (use-package org
   :defer
-  :ensure (org :repo "https://code.tecosaur.net/tec/org-mode.git/"
+  :ensure (org :repo "https://code.200568.top/mirrors/org-mode.git/"
                :branch "dev")
   :hook ((org-mode . org-cdlatex-mode)
          (org-mode . org-indent-mode)

lisp/init-snippet.el

@@ -17,8 +17,8 @@
              yas-maybe-expand-abbrev-key-filter)
   :init
   (defvar yas-verbosity 2)
-  :config
-  (elemacs-load-packages-incrementally '(eldoc easymenu help-mode))
+  ;; :config
+  ;; (elemacs-load-packages-incrementally '(eldoc easymenu help-mode))
   (use-package warnings
     :ensure nil
     :config

lisp/init-ui.el

@@ -61,6 +61,7 @@
 
 (use-package auto-dark
   :when (and (eq system-type 'darwin) (display-graphic-p))
+  :diminish
   :ensure t
   ;; :custom
   ;; (auto-dark-themes '((doric-beach) (leuven)))
@@ -83,30 +84,36 @@
 
 
 (use-package rainbow-delimiters
+  :diminish
   :hook ((prog-mode . rainbow-delimiters-mode)
          (typst-ts-mode . rainbow-delimiters-mode)
          (python-ts-mode . rainbow-delimiters-mode)))
 
 (use-package rainbow-mode
+  :diminish
   :hook text-mode
   :hook prog-mode)
 
-(use-package mood-line
-  :hook emacs-startup
-  :custom (mood-line-glyph-alist mood-line-glyphs-fira-code))
+;; (use-package mood-line
+;;   :hook emacs-startup
+;;   :custom (mood-line-glyph-alist mood-line-glyphs-fira-code))
 
-;; (use-package doom-modeline
-;;   :hook (elpaca-after-init . doom-modeline-mode)
-;;   :config
-;;   (setq doom-modeline-support-imenu t
-;;         doom-modeline-icons nil
-;;         doom-modeline-height 30
-;;         doom-modeline-buffer-file-name-style 'relative-from-project
-;;         doom-modeline-enable-word-count t
-;;         ;; doom-modeline-project-name t
-;;         doom-modeline-check 'simple
-;;         doom-modeline-buffer-encoding nil
-;;         doom-modeline-major-mode-icon nil))
+(use-package doom-modeline
+  :hook (elpaca-after-init . doom-modeline-mode)
+  :config
+  (setq doom-modeline-support-imenu t
+        ;; doom-modeline-icons nil
+        doom-modeline-height 30
+        doom-modeline-buffer-file-name-style 'relative-from-project
+        doom-modeline-enable-word-count t
+        ;; doom-modeline-project-name t
+        doom-modeline-check 'simple
+        doom-modeline-minor-modes t
+        doom-modeline-buffer-encoding nil
+        doom-modeline-major-mode-icon nil))
+
+(use-package minions
+  :hook elpaca-after-init)
 
 (use-package hide-mode-line
   :autoload turn-off-hide-mode-line-mode

lisp/init-utils.el

@@ -30,19 +30,6 @@
   (which-key-add-key-based-replacements "C-x t" "tabs")
   (which-key-add-key-based-replacements "C-x v" "version control"))
 
-;; (use-package grep
-;;   :ensure nil
-;;   :autoload grep-apply-setting
-;;   :init
-;;   (grep-apply-setting
-;;    'grep-command "rg --color=auto --null -nH --no-heading -e ")
-;;   (grep-apply-setting
-;;    'grep-template "rg --color=auto --null --no-heading -g '!*/' -e <R> <D>")
-;;   (grep-apply-setting
-;;    'grep-find-command '("rg --color=auto --null -nH --no-heading -e ''" . 38))
-;;   (grep-apply-setting
-;;    'grep-find-template "rg --color=auto --null -nH --no-heading -e <R> <D>"))
-
 ;; Writable grep buffer
 (use-package wgrep
   :init (setq wgrep-auto-save-buffer t
@@ -61,14 +48,6 @@
   (rg-enable-default-bindings)
   )
 
-;; (use-package sudo-edit
-;;   :commands sudo-edit sudo-edit-find-file
-;;   :bind ("C-c C-r" . sudo-edit))
-
-;; (use-package keycast
-;;   :hook (elpaca-after-init . keycast-mode-line-mode)
-;;   :config
-;;   (setq keycast-mode-line-remove-tail-elements nil))
 
 (use-package elcord)
 

lisp/init-writing.el

@@ -12,6 +12,7 @@
               ))
 
 (use-package jinx
+  ;; :diminish
   :hook ((text-mode prog-mode conf-mode org-mode) . jinx-mode)
   :commands jinx-mode
   :bind ([remap ispell-word] . jinx-correct))