From 4a9297d698e4bdc4376052a42401eb8df7ede621 Mon Sep 17 00:00:00 2001
From: Noel Errenil <leon.errelin@outlook.com>
Date: Fri, 22 Nov 2024 00:19:32 +1100
Subject: [PATCH] Simplify the default `meow-mode-state-list` (#670)

---
 CUSTOMIZATIONS.org | 15 +++++++--------
 meow-var.el        | 32 ++++----------------------------
 2 files changed, 11 insertions(+), 36 deletions(-)

diff --git a/CUSTOMIZATIONS.org b/CUSTOMIZATIONS.org
index f0c089e..9a39787 100644
--- a/CUSTOMIZATIONS.org
+++ b/CUSTOMIZATIONS.org
@@ -112,22 +112,21 @@ see the documentation for the internal function =meow-register-state=.
 Default:
 
 #+begin_src emacs-lisp
-  ((fundamental-mode . normal)
-   (text-mode . normal)
+  ((conf-mode . normal)
+   (fundamental-mode . normal)
+   (help-mode . motion)
    (prog-mode . normal)
-   (conf-mode . normal)
-   (json-mode . normal)
-   ...)
+   (text-mode . normal))
 #+end_src
 
-A list of rules to specify the initial Meow state for major mode.
+A list of rules: each of which specifies the initial Meow state for a major mode.
 
 Value should be a list, each item is ~(major-mode . init-state)~.
 The ~init-state~ can be any state, including custom ones.
 
-By default, Meow will use ~motion~ for special modes (in which none of
+By default, Meow uses ~motion~ for special modes (in which none of
 the alphabet keys trigger a `self-insert` command), and ~normal~ for
-other modes.
+other modes. The default value aims to be general, minimal and sensible.
 
 ** meow-expand-exclude-mode-list
 
diff --git a/meow-var.el b/meow-var.el
index 0d8420f..2debe76 100644
--- a/meow-var.el
+++ b/meow-var.el
@@ -239,35 +239,11 @@ This option will affect the color of position hint and fake region cursor."
   :type 'boolean)
 
 (defcustom meow-mode-state-list
-  '((authinfo-mode . normal)
-    (beancount-mode . normal)
-    (bibtex-mode . normal)
-    (cider-repl-mode . normal)
-    (cider-test-report-mode . normal)
-    (cider-browse-spec-view-mode . motion)
-    (cargo-process-mode . motion)
-    (conf-mode . normal)
-    (deadgrep-edit-mode . normal)
-    (deft-mode . normal)
-    (diff-mode . normal)
-    (ediff-mode . motion)
-    (gud-mode . normal)
-    (haskell-interactive-mode . normal)
-    (help-mode . normal)
-    (helpful-mode . normal)
-    (json-mode . normal)
-    (jupyter-repl-mode . normal)
-    (mix-mode . normal)
-    (occur-edit-mode . normal)
-    (pass-view-mode . normal)
+  '((conf-mode . normal)
+    (fundamental-mode . normal)
+    (help-mode . motion)
     (prog-mode . normal)
-    (py-shell-mode . normal)
-    (restclient-mode . normal)
-    (telega-chat-mode . normal)
-    (term-mode . normal)
-    (text-mode . normal)
-    (vterm-mode . normal)
-    (Custom-mode . normal))
+    (text-mode . normal))
   "A list of rules, each is (major-mode . init-state).
 
 The init-state can be any state, including custom ones."