From 89205bce6ba54d9cbd9a3cc16d27f177ed8b5160 Mon Sep 17 00:00:00 2001 From: Lucas Sta Maria Date: Wed, 31 Jan 2024 13:29:47 -0500 Subject: [PATCH] fix(emacs): introduce `enter-math` for additional region selection Signed-off-by: Lucas Sta Maria --- .emacs.d/include/latexconfig.el | 20 ++++++++++++++------ 1 file changed, 14 insertions(+), 6 deletions(-) diff --git a/.emacs.d/include/latexconfig.el b/.emacs.d/include/latexconfig.el index 791a65d..4622e1e 100644 --- a/.emacs.d/include/latexconfig.el +++ b/.emacs.d/include/latexconfig.el @@ -12,6 +12,19 @@ (save-buffer) (shell-command-to-string "just")) +(defun enter-math () + "Enter and ensure math-mode." + (interactive) + (unless (texmathp) + (cond ((use-region-p) + (let ((selection (buffer-substring-no-properties (region-beginning) (region-end)))) + (delete-region (region-beginning) + (region-end)) + (insert (concat "\\(" selection "\\)")))) + (t + (insert "\\(\\)") + (backward-char 2))))) + (defun configure-latex () "Configure my custom LaTex environment." (electric-indent-mode -1) @@ -23,12 +36,7 @@ (keymap-local-set "C-c C-z" #'custom-compile-latex) (keymap-local-set "C-c C-b" #'latex-insert-block) - (keymap-local-set "C-c C-h" - (lambda () - (interactive) - (unless (texmathp) - (insert "\\(\\)") - (backward-char 2)))) + (keymap-local-set "C-c C-h" #'enter-math) (keymap-local-set "C-c C-/" (lambda () (interactive)