Commit Diff
--- lisp/lh.el +++ 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)
--- lisp/lh.el +++ 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)