如何使用elisp慣用地轉換某些文本？

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))

請注意，在變量命名中使用下划線與常規相反。