Post #2406317
2025-11-26 16:16 UTC
[E̲̅L̲̅I̲̅S̲̅P̲̅]
⚠️ CHΞCK ΛLT TΞXT F0R M0RΞ 1NF0
----BEGIN ELISP----
;; SUGGESTED MACRO
(global-set-key (kbd "M-)") (lambda nil (interactive) (pointer-add-procedure)))
;; FUNCTION
(defun pointer-add-procedure()
"add a procedure on top of current procedure
probably best to bind it to M-)"
(interactive)
(search-backward "(")
(forward-sexp)
(insert ")")
(backward-char)
(backward-sexp)
(insert "( ")
(backward-char))
----END ELISP----
#emacs #lisp #elisp #lambda #programming
Replies (0)
No replies.