mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-05-17 23:22:25 +02:00
Code Activity

web: Be less strict when parsing entity tags.

Browse source 
* module/web/http.scm (parse-entity-tag): Be less strict, accepting
  unquoted strings as well.

* test-suite/tests/web-http.test ("response headers"): Add a test for
  etag parsing.
This commit is contained in:
Andy Wingo 2016-01-07 10:53:57 +01:00 • committed by Ludovic Courtès
parent 5c8b3be820
commit c5dac3595f
2 changed files with 9 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

1
test-suite/tests/web-http.test
View file

@ -353,6 +353,7 @@
(pass-if-parse age "30" 30)
(pass-if-parse etag "\"foo\"" '("foo" . #t))
(pass-if-parse etag "W/\"foo\"" '("foo" . #f))
(pass-if-parse etag "foo" '("foo" . #t))
(pass-if-parse location "http://other-place"
(build-uri 'http #:host "other-place"))
(pass-if-parse proxy-authenticate "Basic realm=\"guile\""