Enhancements for org and elisp

- org: adding an :after advice to org-insert-structure-template so
  that it goes into editing immediately
- elisp: C-M-x evals a region when region is active

1 files changed, 8 insertions, 0 deletions

diff --git a/emacs/.emacs.d/lisp/my/my-prog.el b/emacs/.emacs.d/lisp/my/my-prog.el
index 309df2e..e38a866 100644
--- a/emacs/.emacs.d/lisp/my/my-prog.el
+++ b/emacs/.emacs.d/lisp/my/my-prog.el
@@ -434,5 +434,13 @@ left and the source buffer on the right.
     (unless (derived-mode-p 'haskell-mode 'c-mode 'c++-mode)
       (eglot-format-buffer))))
 
+;;; lisp
+(defun my-eval-defun-or-region (&optional arg)
+  "Call `eval-region' if region is active, otherwise call `eval-defun'"
+  (interactive "P")
+  (if (region-active-p)
+      (eval-region (region-beginning) (region-end) t)
+    (eval-defun arg)))
+
 (provide 'my-prog)
 ;;; my-prog.el ends here