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

lisp/init-base.el

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

lisp/init-kbd.el

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

lisp/init-package.el

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