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

Config: extract keybinding functions and clean up key configs

Browse Source 
- Add init-kbd-func.el for keybinding helper functions
- Move global-display-line-numbers-mode from early-init.el to init.el
- Slim down init-kbd.el: remove hydra-multiple-cursors, migrate defs
- Reorganize dirvish config
- Remove scattered global-set-key bindings from init-org, init-ui, etc.
- Guard server-start with server-running-p check
- Set ibuffer-default-sorting-mode to filename
- Tweak gptel config
This commit is contained in:
User
2026-04-17 06:52:00 +08:00
parent a755ad5a04
commit fffd35f8ed
11 changed files with 376 additions and 467 deletions
Download Patch File Download Diff File Expand all files Collapse all files

26
lisp/init-dired.el
View File

@@ -6,23 +6,6 @@
(setq dired-dwim-target t)
(with-eval-after-load 'dirvish
(define-key dirvish-mode-map (kbd "<down>")
(lambda () (interactive) (forward-line 1) (dired-move-to-filename)))
(define-key dirvish-mode-map (kbd "C-n")
(lambda () (interactive) (forward-line 1) (dired-move-to-filename)))
(define-key dirvish-mode-map (kbd "n")
(lambda () (interactive) (forward-line 1) (dired-move-to-filename)))
(define-key dirvish-mode-map (kbd "b") 'dired-up-directory)
(define-key dirvish-mode-map (kbd "C-b") 'dired-up-directory)
(define-key dirvish-mode-map (kbd "<left>") 'dired-up-directory)
(define-key dirvish-mode-map (kbd "<right>") 'dired-find-file)
(define-key dirvish-mode-map (kbd "C-f") 'dired-find-file)
(define-key dirvish-mode-map (kbd "<SPC>") 'dirvish-layout-toggle))
(with-eval-after-load 'dirvish
(add-hook 'dired-mode-hook #'dired-hide-details-mode))
;; dirvish
(use-package dirvish
:init
@@ -39,6 +22,9 @@
(setq dirvish-default-layout '(1 0.15 0.45))
(with-eval-after-load 'dirvish
(add-hook 'dired-mode-hook #'dired-hide-details-mode))
:custom
(dirvish-quick-access-entries
(cond
@@ -56,7 +42,8 @@
("p" "~/Pictures/" "Pictures")
("d" "~/Downloads/" "Download")
("v" "~/Movies/" "Videos")
("n" "~/org/my-org-note/" "Notes")))
("n" "~/org/my-org-note/" "Notes")
("g" "~/gptel/" "gptel sessions")))
(*is-linux*
'(("h" "~/" "Home")
@@ -65,7 +52,8 @@
("p" "~/图片/" "Pictures")
("d" "~/downloads/" "Downloads")
("v" "~/视频/" "Videos")
("n" "~/org/my-org-note/" "Notes")))
("n" "~/org/my-org-note/" "Notes")
("g" "~/gptel/" "gptel sessions")))
(t nil))))
(use-package trashed