zelongk/.emacs.d
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Update

Browse Source
This commit is contained in:
Zelong Kuang
2026-03-24 22:02:04 +11:00
parent 28b3334925
commit a56b36b3f5
4 changed files with 22 additions and 18 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
early-init.el
View File

@@ -38,12 +38,13 @@
;; Faster to disable these here (before they've been initialized) ;; Faster to disable these here (before they've been initialized)
(push '(menu-bar-lines . 0) default-frame-alist) (push '(menu-bar-lines . 0) default-frame-alist)
(push '(tool-bar-lines . 0) default-frame-alist) (push '(tool-bar-lines . 0) default-frame-alist)
(push '(vertical-scroll-bars . 0) default-frame-alist) (push '(vertical-scroll-bars) default-frame-alist)
(push '(horizontal-scroll-bars) default-frame-alist)
(when (featurep 'ns) (when (featurep 'ns)
(push '(ns-transparent-titlebar . t) default-frame-alist)) (push '(ns-transparent-titlebar . t) default-frame-alist))
;; (push '(ns-appearance . light) default-frame-alist)) ;; (push '(ns-appearance . light) default-frame-alist))
;; Prevent flash of unstyled mode line ;; Prevent flash of unstyled mode line
;; (setq mode-line-format nil) (setq mode-line-format nil)
(provide 'early-init) (provide 'early-init)

20
lisp/init-better-default.el
View File

@@ -28,14 +28,12 @@
circe-mode-hook circe-mode-hook
help-mode-hook help-mode-hook
gud-mode-hook gud-mode-hook
treemacs-mode-hook treemacs-mode-hook
org-mode-hook org-mode-hook
vterm-mode-hook)) vterm-mode-hook))
(add-hook mode (lambda () (display-line-numbers-mode -1)))) (add-hook mode (lambda () (display-line-numbers-mode -1))))
(setq display-line-numbers-type 'relative) (setq display-line-numbers-type 'relative)
) )
(column-number-mode 1)
(scroll-bar-mode -1)
;; (use-package delete-trailing ;; (use-package delete-trailing
;; :ensure nil ;; :ensure nil
@@ -63,11 +61,11 @@
:custom :custom
(recentf-max-saved-items 500) (recentf-max-saved-items 500)
(recentf-exclude (recentf-exclude
'("\\.?cache" ".cask" "url" "COMMIT_EDITMSG\\'" "bookmarks" '("\\.?cache" ".cask" "url" "COMMIT_EDITMSG\\'" "bookmarks"
"\\.\\(?:gz\\|gif\\|svg\\|png\\|jpe?g\\|bmp\\|xpm\\)$" "\\.\\(?:gz\\|gif\\|svg\\|png\\|jpe?g\\|bmp\\|xpm\\)$"
"\\.?ido\\.last$" "\\.revive$" "/G?TAGS$" "/.elfeed/" "\\.?ido\\.last$" "\\.revive$" "/G?TAGS$" "/.elfeed/"
"^/tmp/" "^/var/folders/.+$" "^/ssh:" "/persp-confs/" "^/tmp/" "^/var/folders/.+$" "^/ssh:" "/persp-confs/"
(lambda (file) (file-in-directory-p file package-user-dir)))) (lambda (file) (file-in-directory-p file package-user-dir))))
:config :config
(push (expand-file-name recentf-save-file) recentf-exclude) (push (expand-file-name recentf-save-file) recentf-exclude)
(add-to-list 'recentf-filename-handlers #'abbreviate-file-name) (add-to-list 'recentf-filename-handlers #'abbreviate-file-name)
@@ -106,8 +104,8 @@
password-cache-expiry nil) password-cache-expiry nil)
(setq-default delete-by-moving-to-trash t (setq-default delete-by-moving-to-trash t
x-stretch-cursor t x-stretch-cursor t
window-combination-resize t) window-combination-resize t)
(define-key global-map (kbd "C-<wheel-up>") nil) (define-key global-map (kbd "C-<wheel-up>") nil)
(define-key global-map (kbd "C-<wheel-down>") nil) (define-key global-map (kbd "C-<wheel-down>") nil)
@@ -135,7 +133,7 @@
(use-package ultra-scroll (use-package ultra-scroll
:init :init
(setq scroll-conservatively 3 (setq scroll-conservatively 3
scroll-margin 0) scroll-margin 0)
:hook (elpaca-after-init . ultra-scroll-mode)) :hook (elpaca-after-init . ultra-scroll-mode))
(use-package helpful (use-package helpful

12
lisp/init-utils.el
View File

@@ -6,7 +6,7 @@
:bind ("C-h M-m" . which-key-show-major-mode) :bind ("C-h M-m" . which-key-show-major-mode)
:hook (elpaca-after-init . which-key-mode) :hook (elpaca-after-init . which-key-mode)
:init (setq which-key-max-description-length 30 :init (setq which-key-max-description-length 30
which-key-idle-delay 0.5 which-key-idle-delay 0.5
which-key-lighter nil which-key-lighter nil
which-key-show-remaining-keys t) which-key-show-remaining-keys t)
:config :config
@@ -51,9 +51,9 @@
(use-package rg (use-package rg
:hook (elpaca-after-init . rg-enable-default-bindings) :hook (elpaca-after-init . rg-enable-default-bindings)
:bind (:map rg-global-map :bind (:map rg-global-map
("c" . rg-dwim-current-dir) ("c" . rg-dwim-current-dir)
("f" . rg-dwim-current-file) ("f" . rg-dwim-current-file)
("m" . rg-menu)) ("m" . rg-menu))
:init (setq rg-show-columns t) :init (setq rg-show-columns t)
:config (add-to-list 'rg-custom-type-aliases '("tmpl" . "*.tmpl"))) :config (add-to-list 'rg-custom-type-aliases '("tmpl" . "*.tmpl")))
@@ -61,6 +61,10 @@
:config :config
(pdf-tools-install)) (pdf-tools-install))
(use-package saveplace-pdf-view
:after pdf-tools
:demand t)
;; (use-package keycast ;; (use-package keycast
;; :hook (elpaca-after-init . keycast-mode-line-mode) ;; :hook (elpaca-after-init . keycast-mode-line-mode)
;; :config ;; :config

1
lisp/init-vcs.el
View File

@@ -3,6 +3,7 @@
(use-package transient) (use-package transient)
(use-package magit (use-package magit
:defer t
:bind (("C-c g" . magit-dispatch)) :bind (("C-c g" . magit-dispatch))
:custom :custom
(magit-diff-refine-hunk t) (magit-diff-refine-hunk t)