From bd6518b5a78e6c5f23cd7d8819ecb8345b98f0ef Mon Sep 17 00:00:00 2001
From: Maciej Szlosarczyk <maciej@sosek.net>
Date: Mon, 18 Apr 2022 12:39:22 +0300
Subject: [PATCH] Remove godmode

---
 pkg/base.el      | 27 ---------------------------
 pkg/hydra.el     |  5 +----
 pkg/keys-mode.el |  2 --
 3 files changed, 1 insertion(+), 33 deletions(-)

diff --git a/pkg/base.el b/pkg/base.el
index 3d07c3d..254aa77 100644
--- a/pkg/base.el
+++ b/pkg/base.el
@@ -114,12 +114,6 @@
   :defer t
   :straight t)
 
-(use-package god-mode
-  :defer t
-  :straight t
-  :after which-key
-  )
-
 ;;;;;;;;;;;;;;;;; Use C-n to create a new line
 (setq next-line-add-newlines t)
 
@@ -128,27 +122,6 @@
               bidi-inhibit-bpa t)
 
 (which-key-mode t)
-(which-key-enable-god-mode-support)
-
-(defun +custom-switch-god-mode ()
-  "Switch god mode on and off."
-  (interactive)
-  (if (bound-and-true-p god-local-mode-paused)
-      (god-local-mode-resume)
-    (god-local-mode-pause)))
-
-(god-mode)
-(define-key +custom-keys-mode-map (kbd "C-c C-c") '+custom-switch-god-mode)
-(define-key god-local-mode-map (kbd "i") '+custom-switch-god-mode)
-
-(defun +custom-update-cursor ()
-  "Update cursor based on god mode setup."
-  (setq cursor-type (if (or god-local-mode buffer-read-only)
-                        'box
-                      'hbar)))
-
-(add-hook 'god-mode-enabled-hook '+custom-update-cursor)
-(add-hook 'god-mode-disabled-hook '+custom-update-cursor)
 
 (provide '+custom-pkg-base)
 ;;; base.el ends here
diff --git a/pkg/hydra.el b/pkg/hydra.el
index 84922ca..bff2e6a 100644
--- a/pkg/hydra.el
+++ b/pkg/hydra.el
@@ -188,16 +188,13 @@
     ("q" nil "cancel"))
 
   :bind ("C-c p" . +hydra-project-menu/body)
-        ("C-c C-p" . +hydra-project-menu/body)
         ("C-c h" . +hydra-of-hydras/body)
-        ("C-c C-h" . +hydra-of-hydras/body)
         ("C-c c" . +hydra-code-menu/body)
         ("C-c w" . +hydra-window-menu/body)
         ("C-c s" . +hydra-history-menu/body)
         ("C-c f" . +hydra-font-menu/body)
         ("C-c m" . +hydra-move-menu/body)
-        ("C-c l" . +hydra-language-context-menu/body)
-        ("C-c C-l" . +hydra-language-context-menu/body))
+        ("C-c l" . +hydra-language-context-menu/body))
 
 (provide '+custom-pkg-hydra)
 ;;; hydra.el ends here
diff --git a/pkg/keys-mode.el b/pkg/keys-mode.el
index 781391c..4203fc6 100644
--- a/pkg/keys-mode.el
+++ b/pkg/keys-mode.el
@@ -33,8 +33,6 @@
 (define-key +custom-keys-mode-map (kbd "C-c ]") 'windmove-right)
 (define-key +custom-keys-mode-map (kbd "C-c {") 'windmove-up)
 (define-key +custom-keys-mode-map (kbd "C-c }") 'windmove-down)
-;; (define-key +custom-keys-mode-map (kbd "C-c C-c") 'switch-god-mode)
-;; (god-local-mode-pause)
 
 ;; Kill current buffer and window
 (define-key +custom-keys-mode-map (kbd "C-c q") 'kill-buffer-and-window)