dotemacs

commit 176221acbe983321ddd8bd6b809c199f717e3583
parent 4a2b1b6cc96593fe80ccb13eccdd933bc41f21b4
Author: Lukas Henkel <lh@entf.net>
Date:   Sat, 14 May 2022 20:08:24 +0200

Small util to JSON format an object or a string interactively

Diffstat:
M
lisp/lh.el
 | 
4
++++

1 file changed, 4 insertions(+), 0 deletions(-)
diff --git a/lisp/lh.el b/lisp/lh.el
@@ -101,4 +101,8 @@
     (find-file (concat "/doas::" (buffer-file-name)))
     (kill-buffer old)))
 
+(defun lh/insert-json-encoded (obj)
+  (interactive "MData: ")
+  (insert (json-serialize obj)))
+
 (provide 'lh)