From ea39ea9523b9f89b050d9df8c29a600e98a200b8 Mon Sep 17 00:00:00 2001
From: rearman <rearman@r717.net>
Date: Mon, 19 May 2025 17:08:36 -0400
Subject: [PATCH] Add bindings to wrap in brackets, remove mark bindings

Prefer built in 'C-@' and 'C-x C-@/SPC' for mark bindings
---
 re/re-bindings.el | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/re/re-bindings.el b/re/re-bindings.el
index d92708e..89ba277 100644
--- a/re/re-bindings.el
+++ b/re/re-bindings.el
@@ -25,6 +25,9 @@
 (keymap-global-set "<remap> <downcase-word>" #'downcase-dwim) ; M-l
 (keymap-global-set "<remap> <upcase-word>" #'upcase-dwim) ; M-u
 (keymap-global-set "M-'" #'universal-argument) ; C-u used above
+(keymap-global-set "M-[" #'insert-pair) ; wrap region in brackets
+(keymap-global-set "M-<" #'insert-pair) ; wrap region in angle brackets
+(keymap-global-set "M-{" #'insert-pair) ; wrap region in angle brackets
 
 ;; Wayfindiŋ
 (keymap-global-set "<home>" #'beginning-of-buffer)
@@ -41,8 +44,6 @@
 (keymap-set visual-line-mode-map "C-a" #'re/smart-beginning-of-line)
 (keymap-set visual-line-mode-map "C-e" #'re/smart-end-of-line)
 (keymap-global-set "<remap> <goto-line>" #'re/goto-line)
-(keymap-global-set "C-`" #'re/push-mark-no-activate)
-(keymap-global-set "M-`" #'re/jump-to-mark)
 
 ;; Seeking
 (keymap-global-set "M-s ." #'isearch-forward-thing-at-point)
-- 
2.39.5