diff --git a/gptel-curl.el b/gptel-curl.el index e0f9e0c..d6fc08f 100644 --- a/gptel-curl.el +++ b/gptel-curl.el @@ -199,7 +199,9 @@ See `gptel--url-get-response' for details." (when transformer (setq response (funcall transformer response))) - (put-text-property 0 (length response) 'gptel 'response response) + (add-text-properties + 0 (length response) '(gptel response rear-nonsticky t) + response) (goto-char tracking-marker) (insert response)))))) diff --git a/gptel.el b/gptel.el index fca068c..a7870ee 100644 --- a/gptel.el +++ b/gptel.el @@ -624,7 +624,9 @@ See `gptel--url-get-response' for details." (setq response (gptel--transform-response response gptel-buffer)) (save-excursion - (put-text-property 0 (length response) 'gptel 'response response) + (add-text-properties + 0 (length response) '(gptel response rear-nonsticky t) + response) (with-current-buffer (marker-buffer start-marker) (goto-char start-marker) (run-hooks 'gptel-pre-response-hook)