Add god-mode

I'm trying this out ... again

1 files changed, 12 insertions, 1 deletions

@@ -862,6 +862,8 @@ See also `crux-reopen-as-root-mode'."
                    :fork (:repo "duckwork/discord.el"))))
 
 (setup (:straight electric-cursor)
+  (:option electric-cursor-alist '((overwrite-mode . hbar)
+                                   (god-local-mode . box)))
   (electric-cursor-mode +1))
 
 (setup (:straight elfeed)
@@ -1010,6 +1012,14 @@ See also `crux-reopen-as-root-mode'."
   (:file-match (rx ".rkt" eos)
                (rx ".scm" eos)))
 
+(setup (:straight god-mode)
+  (setq god-mode-enable-function-key-translation nil)
+  (:also-load +god-mode)
+  (:+key "C-M-g" #'god-local-mode)
+  (:with-mode god-local-mode
+    (:bind "i" #'+god-mode-insert
+           "a" #'+god-mode-append)))
+
 (setup (:straight helpful)
   (run-with-idle-timer 0.5 nil
                        'require 'helpful)
@@ -1194,7 +1204,8 @@ See also `crux-reopen-as-root-mode'."
                                        +modeline-ace-window-display
                                        +modeline-modified
                                        ,(+modeline-concat
-                                         '(+modeline-reading-mode
+                                         '(+modeline-god-mode
+                                           +modeline-reading-mode
                                            +modeline-narrowed)
                                          ",")
                                        +modeline-buffer-name