From 7cf5688f1d69ea0802d570adbfbce5e1d8ef556c Mon Sep 17 00:00:00 2001
From: tdback <tyler@tdback.net>
Date: Mon, 10 Feb 2025 22:13:21 -0500
Subject: lisp: update bindings

---
 lisp/td-common.el | 21 ++++++++++++++++-----
 1 file changed, 16 insertions(+), 5 deletions(-)

(limited to 'lisp/td-common.el')

diff --git a/lisp/td-common.el b/lisp/td-common.el
index c703702..d355609 100644
--- a/lisp/td-common.el
+++ b/lisp/td-common.el
@@ -9,16 +9,17 @@
 
 (use-package avy
   :ensure t
-  :bind (("C-'" . avy-goto-char-timer))
+  :bind (("M-j" . avy-goto-char-timer))
   :custom
   (avy-timeout-seconds 0.25))
 
 (use-package consult
   :ensure t
   :demand t
-  :bind (("C-s"     . consult-ripgrep)
-         ("C-M-l"   . consult-imenu)
-         ("C-M-j"   . consult-buffer)
+  :bind (("M-s g"   . consult-ripgrep)
+         ("M-s f"   . consult-find)
+         ("M-s i"   . consult-imenu)
+         ("M-s l"   . consult-line)
          ("C-x C-b" . consult-buffer)
          :map minibuffer-local-map
          ("C-r"     . consult-history)))
@@ -53,6 +54,16 @@
   ;; By default start with a light theme.
   (load-theme 'ef-day t))
 
+(use-package emacs
+  :ensure nil
+  :demand t
+  :bind (("M-c"     . capitalize-dwim)
+         ("M-u"     . upcase-dwim)
+         ("M-l"     . downcase-dwim)
+         ("C-x S"   . eshell)
+         ("C-x M-t" . transpose-regions)
+         ("C-g"     . td/quit-if-not-in-macro)))
+
 (use-package embark
   :ensure t
   :bind (("C-."   . embark-act)
@@ -70,7 +81,7 @@
   :ensure t
   :after embark)
 
-(use-package helpful
+(use-package help
   :ensure t
   :custom
   (counsel-describe-function-function #'helpful-callable)
-- 
cgit v1.2.3