Hook function to save GET body from restclient.el

sb-restclient.el

;;; -*- lexical-binding: t; -*-

(require 'restclient-jq)

(defun restclient-save-body (args args-offset)
  (save-match-data
    (let ((filename (expand-file-name args)))
      (lambda ()
        (with-current-buffer restclient-same-buffer-response-name
          (write-region (point-min) (restclient-jq-result-end-point) filename))))))

(provide 'sb-restclient)