dotfiles-misc/protesilaos.dotfiles
1
0
Fork 0
mirror of https://github.com/protesilaos/dotfiles.git synced 2026-09-10 07:16:20 -04:00
Code Issues Actions Packages Projects Releases Wiki Activity

emcs: add back the %S in prot-elisp.el that I had accidentally removed

Browse source
This commit is contained in:
Protesilaos Stavrou 2025-10-20 06:24:08 +03:00
parent f365606d6d
commit 04b1016f10
No known key found for this signature in database
GPG key ID: 99BD6459CD5CA3EA
2 changed files with 4 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
emacs/.emacs.d/prot-emacs.org
View file

@ -13009,9 +13009,9 @@ At all times, copy the return value to the `kill-ring'."
(when comment-p
(insert (format "%S" expression)))
(let ((return-value (eval expression)))
(kill-new (format "%s" return-value))
(kill-new (format "%S" return-value))
(message "Copied: `%S'" return-value)
(insert (format "\n;; => %s\n" return-value)))))
(insert (format "\n;; => %S\n" return-value)))))
(define-derived-mode prot-elisp-macroexpand-mode emacs-lisp-mode "MacroExpand"
"Like `emacs-lisp-mode' but for macroexpanded forms."

4
emacs/.emacs.d/prot-lisp/prot-elisp.el
View file

@ -52,9 +52,9 @@ At all times, copy the return value to the `kill-ring'."
(when comment-p
(insert (format "%S" expression)))
(let ((return-value (eval expression)))
(kill-new (format "%s" return-value))
(kill-new (format "%S" return-value))
(message "Copied: `%S'" return-value)
(insert (format "\n;; => %s\n" return-value)))))
(insert (format "\n;; => %S\n" return-value)))))
(define-derived-mode prot-elisp-macroexpand-mode emacs-lisp-mode "MacroExpand"
"Like `emacs-lisp-mode' but for macroexpanded forms."