From 32cbab47f8020cde616f16f0f0590612b637f2a3 Mon Sep 17 00:00:00 2001
From: larstvei <larstvei@ifi.uio.no>
Date: Thu, 5 Sep 2024 17:31:18 +0200
Subject: [PATCH] Ditch meow

---
 init.org | 115 +------------------------------------------------------
 1 file changed, 1 insertion(+), 114 deletions(-)

diff --git a/init.org b/init.org
index 642a335..e23029d 100644
--- a/init.org
+++ b/init.org
@@ -342,107 +342,6 @@
 
   #+end_src
 
-** Modal meow
-
-   # TODO: This is so much more than what i need. Find something 1% as complicated.
-   I have been wanting to try out modal editing. [[https://github.com/meow-edit/meow][meow] seems like a nice package,
-   where I can still use a lot of the ten years of Emacs that are already in my
-   fingers. These are the default settings for qwerty.
-
-   #+begin_src emacs-lisp
-
-   (use-package meow
-     :config
-     (setq meow-cheatsheet-layout meow-cheatsheet-layout-qwerty)
-     (add-to-list 'meow-mode-state-list '(vterm-mode . insert))
-     (add-to-list 'meow-mode-state-list '(comint-mode . insert))
-     (meow-motion-overwrite-define-key
-      '("j" . meow-next)
-      '("k" . meow-prev)
-      '("<escape>" . ignore))
-     (meow-leader-define-key
-      ;; SPC j/k will run the original command in MOTION state.
-      '("j" . "H-j")
-      '("k" . "H-k")
-      ;; Use SPC (0-9) for digit arguments.
-      '("1" . meow-digit-argument)
-      '("2" . meow-digit-argument)
-      '("3" . meow-digit-argument)
-      '("4" . meow-digit-argument)
-      '("5" . meow-digit-argument)
-      '("6" . meow-digit-argument)
-      '("7" . meow-digit-argument)
-      '("8" . meow-digit-argument)
-      '("9" . meow-digit-argument)
-      '("0" . meow-digit-argument)
-      '("/" . meow-keypad-describe-key)
-      '("?" . meow-cheatsheet))
-     (meow-normal-define-key
-      '("0" . meow-expand-0)
-      '("9" . meow-expand-9)
-      '("8" . meow-expand-8)
-      '("7" . meow-expand-7)
-      '("6" . meow-expand-6)
-      '("5" . meow-expand-5)
-      '("4" . meow-expand-4)
-      '("3" . meow-expand-3)
-      '("2" . meow-expand-2)
-      '("1" . meow-expand-1)
-      '("-" . negative-argument)
-      '(";" . meow-reverse)
-      '("," . meow-inner-of-thing)
-      '("." . meow-bounds-of-thing)
-      '("[" . meow-beginning-of-thing)
-      '("]" . meow-end-of-thing)
-      '("a" . meow-append)
-      '("A" . meow-open-below)
-      '("b" . meow-back-word)
-      '("B" . meow-back-symbol)
-      '("c" . meow-change)
-      '("d" . meow-delete)
-      '("D" . meow-backward-delete)
-      '("e" . meow-next-word)
-      '("E" . meow-next-symbol)
-      '("f" . meow-find)
-      '("g" . meow-cancel-selection)
-      '("G" . meow-grab)
-      '("h" . meow-left)
-      '("H" . meow-left-expand)
-      '("i" . meow-insert)
-      '("I" . meow-open-above)
-      '("j" . meow-next)
-      '("J" . meow-next-expand)
-      '("k" . meow-prev)
-      '("K" . meow-prev-expand)
-      '("l" . meow-right)
-      '("L" . meow-right-expand)
-      '("m" . meow-join)
-      '("n" . meow-search)
-      '("o" . meow-block)
-      '("O" . meow-to-block)
-      '("p" . meow-yank)
-      '("q" . meow-quit)
-      '("Q" . meow-goto-line)
-      '("r" . meow-replace)
-      '("R" . meow-swap-grab)
-      '("s" . meow-kill)
-      '("t" . meow-till)
-      '("u" . meow-undo)
-      '("U" . meow-undo-in-selection)
-      '("v" . meow-visit)
-      '("w" . meow-mark-word)
-      '("W" . meow-mark-symbol)
-      '("x" . meow-line)
-      '("X" . meow-goto-line)
-      '("y" . meow-save)
-      '("Y" . meow-sync-grab)
-      '("z" . meow-pop-selection)
-      '("'" . repeat)
-      '("<escape>" . ignore))
-     (meow-global-mode 1))
-
-   #+end_src
-
 * Visual
 
   First off, let's declutter. Remove clickies to give a nice and clean look.
@@ -530,25 +429,14 @@
 
    ;; N Λ N O modeline
    (use-package nano-modeline
-     :after meow
      :init
      ;; Disable the default modeline
      (setq-default mode-line-format nil)
      :config
-     (defun meow-nano-modeline-indicator ()
-       "Create the status indicator for the modeline."
-       (pcase (meow--current-state)
-         ('normal (propertize " N " 'face (nano-modeline-face 'status-RO)))
-         ('motion (propertize " M " 'face (nano-modeline-face 'status-RO)))
-         ('insert (propertize " I " 'face (nano-modeline-face 'status-RW)))
-         ('keypad (propertize " K " 'face (nano-modeline-face 'status-**)))
-         ('beacon (propertize " B " 'face (nano-modeline-face 'status-**)))))
-
      (defun my-default-nano-modeline (&optional default)
        "My nano modeline configuration."
        (funcall nano-modeline-position
                 `((nano-modeline-buffer-status)
-                  (meow-nano-modeline-indicator) " "
                   (nano-modeline-buffer-name) " "
                   (nano-modeline-git-info))
                 `((nano-modeline-cursor-position)
@@ -910,8 +798,7 @@
                 ("k" . pdf-view-previous-line-or-previous-page))
     :hook (pdf-view-mode
            . (lambda ()
-               (nano-modeline-pdf-mode)
-               (set (make-local-variable 'meow-cursor-type-default) nil)))
+               (nano-modeline-pdf-mode)))
     :init (pdf-loader-install)
     :config (add-to-list 'revert-without-query ".pdf"))