Update

init.el

@@ -46,6 +46,7 @@
 (require 'init-vcs)
 (require 'init-llm)
 (require 'init-check)
+(require 'init-writing)
 
 ;; (require 'init-eglot)
 (require 'init-lsp)

lisp/init-meow.el

@@ -94,7 +94,6 @@
   (meow-setup)
   (add-to-list 'meow-mode-state-list '((magit-mode . insert)))
   (setq meow-keypad-leader-dispatch "C-c"
-        meow-cursor-type-normal 'hbar
         meow-use-clipboard t)
   (setq meow-replace-state-name-list
         '((normal . "<N>")

lisp/init-window.el

@@ -39,6 +39,7 @@
 (use-package ace-window
   :hook (emacs-startup . ace-window-display-mode)
   :bind (([remap other-window] . ace-window)
+         ("M-o" . ace-window)
          ("C-c w" . ace-window-hydra/body))
   :custom
   (aw-scope 'frame)

lisp/init-workspace.el

@@ -13,6 +13,12 @@
 (use-package ibuffer
   :ensure nil
   :bind ("C-x C-b" . ibuffer)
+  :bind (:map ibuffer-mode-map
+         ("M-o" . nil))
+  :hook (ibuffer-mode . hl-line-mode)
+  :config
+  (add-to-list 'ibuffer-help-buffer-modes 'helpful-mode)
+  (add-to-list 'ibuffer-help-buffer-modes 'Man-mode)
   :init (setq ibuffer-filter-group-name-face '(:inherit (font-lock-string-face bold))))
 (use-package nerd-icons-ibuffer
   :ensure t

lisp/init-writing.el

@@ -0,0 +1,19 @@
+;; -*- lexical-binding: t; -*-
+
+(use-package flyspell
+  :ensure nil
+  :commands flyspell-mode
+  :bind (:map flyspell-mode-map
+              ("C-M-i" . nil)
+              ("C-;" . nil)
+              ("C-," . nil)
+              ("C-; C-4" . 'flyspell-auto-correct-previous-word)
+              ;; ("C-; n" . 'flyspell-goto-next-error)
+              ))
+
+(use-package jinx
+  :hook ((text-mode prog-mode conf-mode org-mode) . jinx-mode)
+  :commands jinx-mode
+  :bind ([remap ispell-word] . jinx-correct))
+
+(provide 'init-writing)