style: Fix indentation and remove trailing whitespace

- Fix inconsistent indentation in init-base.el async block
- Remove trailing blank lines in init-base.el
- Move sly note navigation from M-{/} to C-p/C-n in sly-prefix-map
- Add M-p binding for 'sly-pprint-eval-last-expression'
- Remove C-s/C-r consult-line bindings from dired/dirvish maps
This commit is contained in:
2026-06-23 09:50:53 +08:00
parent 818b32499a
commit f72de2eede
3 changed files with 17 additions and 16 deletions

View File

@@ -81,12 +81,12 @@
;; async ;; async
(if *is-android* (if *is-android*
(use-package async (use-package async
:hook :hook
(after-init . dired-async-mode) (after-init . dired-async-mode)
(after-init . async-bytecomp-package-mode) (after-init . async-bytecomp-package-mode)
:init :init
(setq async-bytecomp-allowed-packages '(all)))) (setq async-bytecomp-allowed-packages '(all))))
;; autorevert buffer ;; autorevert buffer
(use-package autorevert (use-package autorevert
@@ -202,7 +202,7 @@
(lambda () (ibuffer-switch-to-saved-filter-groups "Main") (lambda () (ibuffer-switch-to-saved-filter-groups "Main")
(unless (eq ibuffer-sorting-mode 'alphabetic) (unless (eq ibuffer-sorting-mode 'alphabetic)
(ibuffer-do-sort-by-alphabetic)))) (ibuffer-do-sort-by-alphabetic))))
(setq ibuffer-show-empty-filter-groups nil (setq ibuffer-show-empty-filter-groups nil
ibuffer-use-other-window t ibuffer-use-other-window t
ibuffer-default-sorting-mode 'filename)) ibuffer-default-sorting-mode 'filename))
@@ -241,7 +241,7 @@
(use-package shr (use-package shr
:config :config
(setq shr-inhibit-images nil)) (setq shr-inhibit-images nil))
(provide 'init-base) (provide 'init-base)
;;; init-base.el ends here ;;; init-base.el ends here

View File

@@ -170,9 +170,7 @@
"<right>" 'dired-find-file "<right>" 'dired-find-file
"<left>" 'dired-up-directory "<left>" 'dired-up-directory
"C-/" 'dired-undo "C-/" 'dired-undo
"<SPC>" 'my-dirvish-layout-toggle "<SPC>" 'my-dirvish-layout-toggle)
"C-s" 'consult-line
"C-r" 'consult-line)
(general-def (dired-mode-map dirvish-mode-map) (general-def (dired-mode-map dirvish-mode-map)
:prefix "C-c d" :prefix "C-c d"
@@ -191,12 +189,15 @@
"n" 'magit-section-forward-sibling "n" 'magit-section-forward-sibling
"M-n" 'magit-section-forward) "M-n" 'magit-section-forward)
;; sly-mode ;; sly
(general-def (sly-mode-map sly-editing-mode-map) (general-def (sly-mode-map sly-editing-mode-map)
"M-p" 'backward-paragraph "M-p" 'backward-paragraph
"M-n" 'forward-paragraph "M-n" 'forward-paragraph)
"M-{" 'sly-previous-note
"M-}" 'sly-next-note) (general-def sly-prefix-map
"M-p" 'sly-pprint-eval-last-expression
"C-p" 'sly-previous-note
"C-n" 'sly-next-note)
;; vterm ;; vterm
(general-def vterm-mode-map (general-def vterm-mode-map

View File

@@ -126,7 +126,7 @@
'((magit-project-status "Magit" ?v) '((magit-project-status "Magit" ?v)
(eat-project "Eat" ?E) (eat-project "Eat" ?E)
(project-query-replace-regexp "Query Replace" ?R) (project-query-replace-regexp "Query Replace" ?R)
(consult-ripgrep-project "Ripgrep" ?r)))))) (consult-ripgrep "Ripgrep" ?r))))))
(use-package ibuffer-projectile) (use-package ibuffer-projectile)