cbaines/guile-knots
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Avoid needlessly setting the encoding

Browse source
This commit is contained in:
Christopher Baines 2025-02-07 17:02:37 +00:00
parent cb2085b684
commit ee2a93fbca
1 changed files with 2 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

3
knots/web-server.scm
View file

@ -317,7 +317,8 @@ on the procedure being called at any particular time."
(if body-written? (if body-written?
(begin (begin
(force-output client) (force-output client)
(when (procedure? body) (when (and (procedure? body)
(response-content-length response))
(set-port-encoding! client "ISO-8859-1")) (set-port-encoding! client "ISO-8859-1"))
(keep-alive? response)) (keep-alive? response))
#f))) #f)))