Question

我有一些json，我想在emacs中处理。我发现并使用了elisp库从json中提取所需的内容，我想用我提取的elisp等价替换json。

这就是我写的：

(defun extract-foo (start end)
  "Extract the foo field from a json object in the region"
  (interactive "r")
  (let ((my_json (cdr (assoc 'FOO  (json-read-from-string (buffer-substring-no-properties start end))))))
    (delete-region start end)
    (SOMETHING) 
))

我陷入了困境。我似乎无法找到一种方法将my_json的内容写入标记处的缓冲区。我能想到的唯一方法是将文本保存到临时缓冲区，然后(insert-buffer)。这对我来说似乎过分了。

如何在elisp中以惯用方式执行此操作？

Answer 1

写回JSON部分

(insert (format "%s" (json-encode my-json)))

写回elisp：

(insert (format "%s" my-json))

请注意，在变量命名中使用下划线与常规相反。

如何使用elisp惯用地转换某些文本？

1 个答案: