Config: optimize exwm config.

lisp/init-kbd.el

@@ -94,11 +94,12 @@
 
 ;; scratch buffer
 (if *is-mac*
-    (general-def "C-c <f12>" 'scratch-buffer)
-  (general-def "C-c <delete>" 'scratch-buffer))
+    (general-def "C-c <f12>" 'persp-switch-to-scratch-buffer)
+  (general-def "C-c <delete>" 'persp-switch-to-scratch-buffer))
 
 ;; dired
 (general-def (dired-mode-map dirvish-mode-map)
+  "s" 'dirvish-quicksort
   "h" 'dirvish-history-menu
   "M-," 'scroll-other-window-down
   "M-." 'scroll-other-window
@@ -180,7 +181,6 @@
   "C-x C-b" 'ibuffer-other-window
   "C-x K" 'crux-kill-other-buffers
   "C-x b" 'consult-buffer
-  "M-o" 'other-window
 
   ;; edit
   "M-c" 'capitalize-dwim
@@ -189,7 +189,7 @@
   "C-," 'duplicate-and-move-to-next-line
   "C-k" 'crux-smart-kill-line
   "C-<backspace>" 'crux-kill-line-backwards
-  "C-o" 'crux-smart-open-line
+  "C-o" 'open-line
   "C-a" 'crux-move-beginning-of-line
   "M-y" 'consult-yank-from-kill-ring
   "C-c <backspace>" 'hungry-delete-backward
@@ -216,9 +216,10 @@
   "M-<right>" 'enlarge-window-horizontally
   "M-<down>" 'shrink-window
   "M-<up>" 'enlarge-window
-  "<f10>" 'esw/swap-two-windows
   "M-`" 'popper-toggle
   "C-M-=" 'popper-toggle-type-delete-other-window
+  "M-o" 'other-window
+  "<f10>" 'esw/swap-two-windows
 
   ;; other
   "C-x r b" 'consult-bookmark
@@ -261,15 +262,19 @@
 ------------------------------------------------------------------
 _p_ : prev line             _P_ : previous         _c_ : edit lines
 _n_ : next line             _N_ : next             _._ : pop
-_f_ : next symbol                                _q_ : quit
-_b_ : prev symbol
+_b_ : prev word                                    _q_ : quit
+_f_ : next word
+_B_ : prev symbol
+_F_ : next symbol
 _s_ : in region
 _a_ : all dwim
 "
   ("p" mc/mark-previous-like-this)
   ("n" mc/mark-next-like-this)
-  ("b" mc/mark-previous-like-this-symbol)
-  ("f" mc/mark-next-like-this-symbol)
+  ("b" mc/mark-previous-like-this-word)
+  ("f" mc/mark-next-like-this-word)
+  ("B" mc/mark-previous-like-this-symbol)
+  ("F" mc/mark-next-like-this-symbol)
   ("P" mc/unmark-previous-like-this)
   ("N" mc/unmark-next-like-this)
   ("a" mc/mark-all-dwim)