From 470d2b8e4554ec10c294adaaa8362b83cdd49c68 Mon Sep 17 00:00:00 2001
From: MitchMarq42 <dr.m.perseos@gmail.com>
Date: Wed, 8 Feb 2023 13:56:15 -0900
Subject: [PATCH] Org: fix `<>` and add block-type completion

---
 lisp/mitch-packages.el | 14 +++++++++++++-
 1 file changed, 13 insertions(+), 1 deletion(-)

diff --git a/lisp/mitch-packages.el b/lisp/mitch-packages.el
index 85e143d..32c7753 100644
--- a/lisp/mitch-packages.el
+++ b/lisp/mitch-packages.el
@@ -600,6 +600,8 @@ targets."
   (add-hook 'after-save-hook
 	    (lambda () (if (equal major-mode 'org-mode)
 			   (org-babel-tangle))))
+  (remove '(?< . ?>) electric-pair-pairs)
+  (electric-pair-mode -1)
   (defvar org-electric-pairs '((?_ . ?_)
 			       (?/ . ?/)
 			       (?* . ?*)
@@ -639,7 +641,17 @@ See https://emacs.stackexchange.com/questions/2538/how-to-define-additional-mode
    "*" 'mitch/org-dwim-char
    "+" 'mitch/org-dwim-char
    "~" 'mitch/org-dwim-char
-   "=" 'mitch/org-dwim-char))
+   "=" 'mitch/org-dwim-char)
+  (general-define-key
+   :states 'normal
+   :keymaps 'org-src-mode-map
+   "ZZ" 'org-edit-src-exit))
+(elpaca-use-package (org-block-capf
+		     :host github
+		     :repo "xenodium/org-block-capf")
+  :after org
+  :init (add-hook 'org-mode-hook
+		  #'org-block-capf-add-to-completion-at-point-functions))
 
 (elpaca-use-package org-tempo
   :ensure nil