diff options
| author | Jakob L. Kreuze <zerodaysfordays@sdf.org> | 2022-08-23 20:48:14 -0400 |
|---|---|---|
| committer | Jakob L. Kreuze <zerodaysfordays@sdf.org> | 2022-08-28 11:43:07 -0400 |
| commit | 17be9b49c47243fa1e97c4b458fed3261500aa00 (patch) | |
| tree | 79b12251f03ccf1d0a023e77391b320e3dcc4414 | |
| parent | 5bceffc9295a7dc7356a9d38a6f2d6cd85a93544 (diff) | |
[dynamic] Fix shadowing bug introduced by refactoring
| -rw-r--r-- | dynamic/api.scm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/dynamic/api.scm b/dynamic/api.scm index 22a9856..86bc23d 100644 --- a/dynamic/api.scm +++ b/dynamic/api.scm @@ -65,10 +65,10 @@ (cons '(Access-Control-Allow-Origin . "*") response))) (let* ((path-encoded (uri-path (request-uri request))) (path (split-and-decode-uri-path path-encoded))) - (define-values (response body) + (define-values (response resp-body) (if (string= "api" (first path)) (handle-api-request request body (drop path 1)) (not-found request))) - (values (wrap-response response) body))) + (values (wrap-response response) resp-body))) (run-server main-request-handler) |