mirror of
https://git.savannah.gnu.org/git/guile.git
synced 2025-04-30 20:00:19 +02:00
fix entity tag writing
* module/web/http.scm (write-entity-tag): Fix writing of entity tags (strong versus weak).
This commit is contained in:
parent
b500ced6b8
commit
adcd58543c
1 changed files with 1 additions and 1 deletions
|
@ -573,7 +573,7 @@
|
|||
(string? (car val))))
|
||||
|
||||
(define (write-entity-tag val port)
|
||||
(if (cdr val)
|
||||
(if (not (cdr val))
|
||||
(display "W/" port))
|
||||
(write-qstring (car val) port))
|
||||
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue