From: rearman <rearman@r717.net>
Date: Tue, 25 Jun 2024 13:02:05 +0000 (-0400)
Subject: Fix up send-on-close-paren macro & binding
X-Git-Url: https://git.earman.xyz/?a=commitdiff_plain;h=50b47241252e38d91e1f7ba2485fca418272cc74;p=emacsinit.git

Fix up send-on-close-paren macro & binding
---

diff --git a/re/re-bindings.el b/re/re-bindings.el
index 3d1b92f..cb0929f 100644
--- a/re/re-bindings.el
+++ b/re/re-bindings.el
@@ -63,11 +63,11 @@
 (add-hook 'ielm-mode-hook
 	  (lambda ()
 	    (keymap-set inferior-emacs-lisp-mode-map "C-l" 'comint-clear-buffer)
-	    (keymap-set inferior-emacs-lisp-mode-map ")" '(re/send-on-close-paren 'ielm-send-input))))
+	    (keymap-set inferior-emacs-lisp-mode-map ")" (re/send-on-close-paren 'ielm-send-input))))
 (keymap-global-set "C-c e" 'eshell)
 (add-hook 'eshell-mode-hook
 	  (lambda ()
-	    (keymap-set eshell-mode-map ")" '(re/send-on-close-paren 'eshell-send-input))
+	    (keymap-set eshell-mode-map ")" (re/send-on-close-paren 'eshell-send-input))
 	    (keymap-set eshell-mode-map "C-d" 'eshell-quit-or-delete-char)))
 
 
diff --git a/re/re-repl-defuns.el b/re/re-repl-defuns.el
index 5e9eb66..3be9c5c 100644
--- a/re/re-repl-defuns.el
+++ b/re/re-repl-defuns.el
@@ -8,6 +8,7 @@
 When a sexp is complete - that is when parens balance as you type - execute it.
 Use this macro as a direct binding"
   `(lambda ()
+     (interactive)
      (insert-char 41)
      (when (= 0 (car (syntax-ppss)))
        (call-interactively ,executor))))