diff options
| author | Arun Isaac | 2026-05-10 20:24:54 +0100 |
|---|---|---|
| committer | Arun Isaac | 2026-05-11 22:03:17 +0100 |
| commit | b8edd351cbff3db7bff50574edaf208572097cc4 (patch) | |
| tree | 53d8e696df1f0f90094148142a9e090b7cc570fe | |
| parent | 1aa1950765ccdd5bd48c8877acb6aa97763f57b5 (diff) | |
| download | kaagum-b8edd351cbff3db7bff50574edaf208572097cc4.tar.gz kaagum-b8edd351cbff3db7bff50574edaf208572097cc4.tar.lz kaagum-b8edd351cbff3db7bff50574edaf208572097cc4.zip | |
Report request parameters as irritants on failed HTTP requests.
| -rw-r--r-- | kaagum/openai.scm | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/kaagum/openai.scm b/kaagum/openai.scm index 87478fd..4cf643d 100644 --- a/kaagum/openai.scm +++ b/kaagum/openai.scm @@ -58,12 +58,14 @@ additional @var{headers}. Return JSON response." ((4) (raise-exception (condition (make-violation) + (make-irritants-condition (list method url headers body)) (make-message-condition (string-append "JSON API request failed with client error code " (number->string (response-code response))))))) (else (raise-exception (condition (make-error) + (make-irritants-condition (list method url headers body)) (make-message-condition (string-append "JSON API request failed with code " (number->string (response-code response)))))))))) |